autohotkey/UltimateKEYS (for AutoHotkey v2).ahk

   1 #requires AutoHotkey v2
   2
   3 ; UltimateKEYS (for AutoHotkey v2).ahk - 2024-11-20
   4
   5 ; Website :  https://pieter-degroote.github.io/UltimateKEYS/
   6
   7 ; GitHub :   https://github.com/pieter-degroote/UltimateKEYS
   8
   9 ; License :  GNU General Public License Version 3
  10
  11
  12 ; Configuration :
  13
  14 ; Keyboard layout (on Windows) :  US QWERTY
  15
  16
  17
  18 KeyHistory 0      ; disables the key history (for privacy and security)
  19 ListLines False   ; omits recently executed lines from history (for privacy and security)
  20
  21 SendMode "Input"  ; optimizes for faster and more reliable input
  22
  23 global gEndKeys := "{bs}{del}{esc}{home}{end}"  ; ends dead key input on specific keys
  24
  25
  26 ; Compose :  Acute Accent (')
  27
  28 global cmpAcuteAccent := Map()
  29 cmpAcuteAccent["a"] := "{u+00e1}"  ; (á) a with acute
  30 cmpAcuteAccent["A"] := "{u+00c1}"  ; (Á) A with acute
  31 cmpAcuteAccent["c"] := "{u+0107}"  ; (ć) c with acute
  32 cmpAcuteAccent["C"] := "{u+0106}"  ; (Ć) C with acute
  33 cmpAcuteAccent["d"] := "{u+1e09}"  ; (ḉ) c with cedilla and acute
  34 cmpAcuteAccent["D"] := "{u+1e08}"  ; (Ḉ) C with cedilla and acute
  35 cmpAcuteAccent["e"] := "{u+00e9}"  ; (é) e with acute
  36 cmpAcuteAccent["E"] := "{u+00c9}"  ; (É) E with acute
  37 cmpAcuteAccent["g"] := "{u+01f5}"  ; (ǵ) g with acute
  38 cmpAcuteAccent["G"] := "{u+01f4}"  ; (Ǵ) G with acute
  39 cmpAcuteAccent["i"] := "{u+00ed}"  ; (í) i with acute
  40 cmpAcuteAccent["I"] := "{u+00cd}"  ; (Í) I with acute
  41 cmpAcuteAccent["j"] := "{u+01ff}"  ; (ǿ) o with stroke and acute
  42 cmpAcuteAccent["J"] := "{u+01fe}"  ; (Ǿ) O with stroke and acute
  43 cmpAcuteAccent["k"] := "{u+1e31}"  ; (ḱ) k with acute
  44 cmpAcuteAccent["K"] := "{u+1e30}"  ; (Ḱ) K with acute
  45 cmpAcuteAccent["l"] := "{u+013a}"  ; (ĺ) l with acute
  46 cmpAcuteAccent["L"] := "{u+0139}"  ; (Ĺ) L with acute
  47 cmpAcuteAccent["m"] := "{u+1e3f}"  ; (ḿ) m with acute
  48 cmpAcuteAccent["M"] := "{u+1e3e}"  ; (Ḿ) M with acute
  49 cmpAcuteAccent["n"] := "{u+0144}"  ; (ń) n with acute
  50 cmpAcuteAccent["N"] := "{u+0143}"  ; (Ń) N with acute
  51 cmpAcuteAccent["o"] := "{u+00f3}"  ; (ó) o with acute
  52 cmpAcuteAccent["O"] := "{u+00d3}"  ; (Ó) O with acute
  53 cmpAcuteAccent["p"] := "{u+1e55}"  ; (ṕ) p with acute
  54 cmpAcuteAccent["P"] := "{u+1e54}"  ; (Ṕ) P with acute
  55 cmpAcuteAccent["q"] := "{u+01fd}"  ; (ǽ) ae with acute
  56 cmpAcuteAccent["Q"] := "{u+01fc}"  ; (Ǽ) AE with acute
  57 cmpAcuteAccent["r"] := "{u+0155}"  ; (ŕ) r with acute
  58 cmpAcuteAccent["R"] := "{u+0154}"  ; (Ŕ) R with acute
  59 cmpAcuteAccent["s"] := "{u+015b}"  ; (ś) s with acute
  60 cmpAcuteAccent["S"] := "{u+015a}"  ; (Ś) S with acute
  61 cmpAcuteAccent["u"] := "{u+00fa}"  ; (ú) u with acute
  62 cmpAcuteAccent["U"] := "{u+00da}"  ; (Ú) U with acute
  63 cmpAcuteAccent["w"] := "{u+1e83}"  ; (ẃ) w with acute
  64 cmpAcuteAccent["W"] := "{u+1e82}"  ; (Ẃ) W with acute
  65 cmpAcuteAccent["x"] := "{u+01fb}"  ; (ǻ) a with ring above and acute
  66 cmpAcuteAccent["X"] := "{u+01fa}"  ; (Ǻ) A with ring above and acute
  67 cmpAcuteAccent["y"] := "{u+00fd}"  ; (ý) y with acute
  68 cmpAcuteAccent["Y"] := "{u+00dd}"  ; (Ý) Y with acute
  69 cmpAcuteAccent["z"] := "{u+017a}"  ; (ź) z with acute
  70 cmpAcuteAccent["Z"] := "{u+0179}"  ; (Ź) Z with acute
  71
  72
  73 ; Compose :  Grave Accent (`)
  74
  75 global cmpGraveAccent := Map()
  76 cmpGraveAccent["a"] := "{u+00e0}"  ; (à) a with grave
  77 cmpGraveAccent["A"] := "{u+00c0}"  ; (À) A with grave
  78 cmpGraveAccent["e"] := "{u+00e8}"  ; (è) e with grave
  79 cmpGraveAccent["E"] := "{u+00c8}"  ; (È) E with grave
  80 cmpGraveAccent["i"] := "{u+00ec}"  ; (ì) i with grave
  81 cmpGraveAccent["I"] := "{u+00cc}"  ; (Ì) I with grave
  82 cmpGraveAccent["n"] := "{u+01f9}"  ; (ǹ) n with grave
  83 cmpGraveAccent["N"] := "{u+01f8}"  ; (Ǹ) N with grave
  84 cmpGraveAccent["o"] := "{u+00f2}"  ; (ò) o with grave
  85 cmpGraveAccent["O"] := "{u+00d2}"  ; (Ò) O with grave
  86 cmpGraveAccent["u"] := "{u+00f9}"  ; (ù) u with grave
  87 cmpGraveAccent["U"] := "{u+00d9}"  ; (Ù) U with grave
  88 cmpGraveAccent["w"] := "{u+1e81}"  ; (ẁ) w with grave
  89 cmpGraveAccent["W"] := "{u+1e80}"  ; (Ẁ) W with grave
  90 cmpGraveAccent["y"] := "{u+1ef3}"  ; (ỳ) y with grave
  91 cmpGraveAccent["Y"] := "{u+1ef2}"  ; (Ỳ) Y with grave
  92
  93
  94 ; Compose :  Diaeresis (")
  95
  96 global cmpDiaeresis := Map()
  97 cmpDiaeresis["a"] := "{u+00e4}"  ; (ä) a with diaeresis
  98 cmpDiaeresis["A"] := "{u+00c4}"  ; (Ä) A with diaeresis
  99 cmpDiaeresis["e"] := "{u+00eb}"  ; (ë) e with diaeresis
 100 cmpDiaeresis["E"] := "{u+00cb}"  ; (Ë) E with diaeresis
 101 cmpDiaeresis["h"] := "{u+1e27}"  ; (ḧ) h with diaeresis
 102 cmpDiaeresis["H"] := "{u+1e26}"  ; (Ḧ) H with diaeresis
 103 cmpDiaeresis["i"] := "{u+00ef}"  ; (ï) i with diaeresis
 104 cmpDiaeresis["I"] := "{u+00cf}"  ; (Ï) I with diaeresis
 105 cmpDiaeresis["o"] := "{u+00f6}"  ; (ö) o with diaeresis
 106 cmpDiaeresis["O"] := "{u+00d6}"  ; (Ö) O with diaeresis
 107 cmpDiaeresis["t"] := "{u+1e97}"  ; (ẗ) t with diaeresis
 108 cmpDiaeresis["u"] := "{u+00fc}"  ; (ü) u with diaeresis
 109 cmpDiaeresis["U"] := "{u+00dc}"  ; (Ü) U with diaeresis
 110 cmpDiaeresis["w"] := "{u+1e85}"  ; (ẅ) w with diaeresis
 111 cmpDiaeresis["W"] := "{u+1e84}"  ; (Ẅ) W with diaeresis
 112 cmpDiaeresis["x"] := "{u+1e8d}"  ; (ẍ) x with diaeresis
 113 cmpDiaeresis["X"] := "{u+1e8c}"  ; (Ẍ) X with diaeresis
 114 cmpDiaeresis["y"] := "{u+00ff}"  ; (ÿ) y with diaeresis
 115 cmpDiaeresis["Y"] := "{u+0178}"  ; (Ÿ) Y with diaeresis
 116
 117
 118 ; Compose :  Circumflex Accent (c)
 119
 120 global cmpCircumflex := Map()
 121 cmpCircumflex["a"] := "{u+00e2}"  ; (â) a with circumflex
 122 cmpCircumflex["A"] := "{u+00c2}"  ; (Â) A with circumflex
 123 cmpCircumflex["c"] := "{u+0109}"  ; (ĉ) c with circumflex
 124 cmpCircumflex["C"] := "{u+0108}"  ; (Ĉ) C with circumflex
 125 cmpCircumflex["e"] := "{u+00ea}"  ; (ê) e with circumflex
 126 cmpCircumflex["E"] := "{u+00ca}"  ; (Ê) E with circumflex
 127 cmpCircumflex["g"] := "{u+011d}"  ; (ĝ) g with circumflex
 128 cmpCircumflex["G"] := "{u+011c}"  ; (Ĝ) G with circumflex
 129 cmpCircumflex["h"] := "{u+0125}"  ; (ĥ) h with circumflex
 130 cmpCircumflex["H"] := "{u+0124}"  ; (Ĥ) H with circumflex
 131 cmpCircumflex["i"] := "{u+00ee}"  ; (î) i with circumflex
 132 cmpCircumflex["I"] := "{u+00ce}"  ; (Î) I with circumflex
 133 cmpCircumflex["j"] := "{u+0135}"  ; (ĵ) j with circumflex
 134 cmpCircumflex["J"] := "{u+0134}"  ; (Ĵ) J with circumflex
 135 cmpCircumflex["o"] := "{u+00f4}"  ; (ô) o with circumflex
 136 cmpCircumflex["O"] := "{u+00d4}"  ; (Ô) O with circumflex
 137 cmpCircumflex["s"] := "{u+015d}"  ; (ŝ) s with circumflex
 138 cmpCircumflex["S"] := "{u+015c}"  ; (Ŝ) S with circumflex
 139 cmpCircumflex["u"] := "{u+00fb}"  ; (û) u with circumflex
 140 cmpCircumflex["U"] := "{u+00db}"  ; (Û) U with circumflex
 141 cmpCircumflex["w"] := "{u+0175}"  ; (ŵ) w with circumflex
 142 cmpCircumflex["W"] := "{u+0174}"  ; (Ŵ) W with circumflex
 143 cmpCircumflex["y"] := "{u+0177}"  ; (ŷ) y with circumflex
 144 cmpCircumflex["Y"] := "{u+0176}"  ; (Ŷ) Y with circumflex
 145 cmpCircumflex["z"] := "{u+1e91}"  ; (ẑ) z with circumflex
 146 cmpCircumflex["Z"] := "{u+1e90}"  ; (Ẑ) Z with circumflex
 147
 148
 149 ; Compose :  Tilde (~)
 150
 151 global cmpTilde := Map()
 152 cmpTilde["a"] := "{u+00e3}"  ; (ã) a with tilde
 153 cmpTilde["A"] := "{u+00c3}"  ; (Ã) A with tilde
 154 cmpTilde["e"] := "{u+1ebd}"  ; (ẽ) e with tilde
 155 cmpTilde["E"] := "{u+1ebc}"  ; (Ẽ) E with tilde
 156 cmpTilde["i"] := "{u+0129}"  ; (ĩ) i with tilde
 157 cmpTilde["I"] := "{u+0128}"  ; (Ĩ) I with tilde
 158 cmpTilde["l"] := "{u+026b}"  ; (ɫ) l with middle tilde
 159 cmpTilde["L"] := "{u+2c62}"  ; (Ɫ) L with middle tilde
 160 cmpTilde["n"] := "{u+00f1}"  ; (ñ) n with tilde
 161 cmpTilde["N"] := "{u+00d1}"  ; (Ñ) N with tilde
 162 cmpTilde["o"] := "{u+00f5}"  ; (õ) o with tilde
 163 cmpTilde["O"] := "{u+00d5}"  ; (Õ) O with tilde
 164 cmpTilde["u"] := "{u+0169}"  ; (ũ) u with tilde
 165 cmpTilde["U"] := "{u+0168}"  ; (Ũ) U with tilde
 166 cmpTilde["v"] := "{u+1e7d}"  ; (ṽ) v with tilde
 167 cmpTilde["V"] := "{u+1e7c}"  ; (Ṽ) V with tilde
 168 cmpTilde["y"] := "{u+1ef9}"  ; (ỹ) y with tilde
 169 cmpTilde["Y"] := "{u+1ef8}"  ; (Ỹ) Y with tilde
 170
 171
 172 ; Compose :  Cedilla and Ogonek (,)
 173
 174 global cmpCedillaOgonek := Map()
 175 cmpCedillaOgonek["a"] := "{u+0105}"  ; (ą) a with ogonek
 176 cmpCedillaOgonek["A"] := "{u+0104}"  ; (Ą) A with ogonek
 177 cmpCedillaOgonek["c"] := "{u+00e7}"  ; (ç) c with cedilla
 178 cmpCedillaOgonek["C"] := "{u+00c7}"  ; (Ç) C with cedilla
 179 cmpCedillaOgonek["d"] := "{u+1e11}"  ; (ḑ) d with cedilla
 180 cmpCedillaOgonek["D"] := "{u+1e10}"  ; (Ḑ) D with cedilla
 181 cmpCedillaOgonek["e"] := "{u+0119}"  ; (ę) e with ogonek
 182 cmpCedillaOgonek["E"] := "{u+0118}"  ; (Ę) E with ogonek
 183 cmpCedillaOgonek["f"] := "{u+0229}"  ; (ȩ) e with cedilla
 184 cmpCedillaOgonek["F"] := "{u+0228}"  ; (Ȩ) E with cedilla
 185 cmpCedillaOgonek["g"] := "{u+0123}"  ; (ģ) g with cedilla
 186 cmpCedillaOgonek["G"] := "{u+0122}"  ; (Ģ) G with cedilla
 187 cmpCedillaOgonek["h"] := "{u+1e29}"  ; (ḩ) h with cedilla
 188 cmpCedillaOgonek["H"] := "{u+1e28}"  ; (Ḩ) H with cedilla
 189 cmpCedillaOgonek["i"] := "{u+012f}"  ; (į) i with ogonek
 190 cmpCedillaOgonek["I"] := "{u+012e}"  ; (Į) I with ogonek
 191 cmpCedillaOgonek["k"] := "{u+0137}"  ; (ķ) k with cedilla
 192 cmpCedillaOgonek["K"] := "{u+0136}"  ; (Ķ) K with cedilla
 193 cmpCedillaOgonek["l"] := "{u+013c}"  ; (ļ) l with cedilla
 194 cmpCedillaOgonek["L"] := "{u+013b}"  ; (Ļ) L with cedilla
 195 cmpCedillaOgonek["n"] := "{u+0146}"  ; (ņ) n with cedilla
 196 cmpCedillaOgonek["N"] := "{u+0145}"  ; (Ņ) N with cedilla
 197 cmpCedillaOgonek["o"] := "{u+01eb}"  ; (ǫ) o with ogonek
 198 cmpCedillaOgonek["O"] := "{u+01ea}"  ; (Ǫ) O with ogonek
 199 cmpCedillaOgonek["r"] := "{u+0157}"  ; (ŗ) r with cedilla
 200 cmpCedillaOgonek["R"] := "{u+0156}"  ; (Ŗ) R with cedilla
 201 cmpCedillaOgonek["s"] := "{u+015f}"  ; (ş) s with cedilla
 202 cmpCedillaOgonek["S"] := "{u+015e}"  ; (Ş) S with cedilla
 203 cmpCedillaOgonek["t"] := "{u+0163}"  ; (ţ) t with cedilla
 204 cmpCedillaOgonek["T"] := "{u+0162}"  ; (Ţ) T with cedilla
 205 cmpCedillaOgonek["u"] := "{u+0173}"  ; (ų) u with ogonek
 206 cmpCedillaOgonek["U"] := "{u+0172}"  ; (Ų) U with ogonek
 207
 208
 209 ; Compose :  Caron (v)
 210
 211 global cmpCaron := Map()
 212 cmpCaron["a"] := "{u+01ce}"  ; (ǎ) a with caron
 213 cmpCaron["A"] := "{u+01cd}"  ; (Ǎ) A with caron
 214 cmpCaron["c"] := "{u+010d}"  ; (č) c with caron
 215 cmpCaron["C"] := "{u+010c}"  ; (Č) C with caron
 216 cmpCaron["d"] := "{u+010f}"  ; (ď) d with caron
 217 cmpCaron["D"] := "{u+010e}"  ; (Ď) D with caron
 218 cmpCaron["e"] := "{u+011b}"  ; (ě) e with caron
 219 cmpCaron["E"] := "{u+011a}"  ; (Ě) E with caron
 220 cmpCaron["g"] := "{u+01e7}"  ; (ǧ) g with caron
 221 cmpCaron["G"] := "{u+01e6}"  ; (Ǧ) G with caron
 222 cmpCaron["h"] := "{u+021f}"  ; (ȟ) h with caron
 223 cmpCaron["H"] := "{u+021e}"  ; (Ȟ) H with caron
 224 cmpCaron["i"] := "{u+01d0}"  ; (ǐ) i with caron
 225 cmpCaron["I"] := "{u+01cf}"  ; (Ǐ) I with caron
 226 cmpCaron["j"] := "{u+01f0}"  ; (ǰ) j with caron
 227 cmpCaron["k"] := "{u+01e9}"  ; (ǩ) k with caron
 228 cmpCaron["K"] := "{u+01e8}"  ; (Ǩ) K with caron
 229 cmpCaron["l"] := "{u+013e}"  ; (ľ) l with caron
 230 cmpCaron["L"] := "{u+013d}"  ; (Ľ) L with caron
 231 cmpCaron["n"] := "{u+0148}"  ; (ň) n with caron
 232 cmpCaron["N"] := "{u+0147}"  ; (Ň) N with caron
 233 cmpCaron["o"] := "{u+01d2}"  ; (ǒ) o with caron
 234 cmpCaron["O"] := "{u+01d1}"  ; (Ǒ) O with caron
 235 cmpCaron["r"] := "{u+0159}"  ; (ř) r with caron
 236 cmpCaron["R"] := "{u+0158}"  ; (Ř) R with caron
 237 cmpCaron["s"] := "{u+0161}"  ; (š) s with caron
 238 cmpCaron["S"] := "{u+0160}"  ; (Š) S with caron
 239 cmpCaron["t"] := "{u+0165}"  ; (ť) t with caron
 240 cmpCaron["T"] := "{u+0164}"  ; (Ť) T with caron
 241 cmpCaron["u"] := "{u+01d4}"  ; (ǔ) u with caron
 242 cmpCaron["U"] := "{u+01d3}"  ; (Ǔ) U with caron
 243 cmpCaron["z"] := "{u+017e}"  ; (ž) z with caron
 244 cmpCaron["Z"] := "{u+017d}"  ; (Ž) Z with caron
 245 cmpCaron["3"] := "{u+01ef}"  ; (ǯ) small letter ezh with caron
 246 cmpCaron["#"] := "{u+01ee}"  ; (Ǯ) capital letter ezh with caron
 247
 248
 249 ; Compose :  Dot Above (.)
 250
 251 global cmpDotAbove := Map()
 252 cmpDotAbove["a"] := "{u+0227}"  ; (ȧ) a with dot above
 253 cmpDotAbove["A"] := "{u+0226}"  ; (Ȧ) A with dot above
 254 cmpDotAbove["b"] := "{u+1e03}"  ; (ḃ) b with dot above
 255 cmpDotAbove["B"] := "{u+1e02}"  ; (Ḃ) B with dot above
 256 cmpDotAbove["c"] := "{u+010b}"  ; (ċ) c with dot above
 257 cmpDotAbove["C"] := "{u+010a}"  ; (Ċ) C with dot above
 258 cmpDotAbove["d"] := "{u+1e0b}"  ; (ḋ) d with dot above
 259 cmpDotAbove["D"] := "{u+1e0a}"  ; (Ḋ) D with dot above
 260 cmpDotAbove["e"] := "{u+0117}"  ; (ė) e with dot above
 261 cmpDotAbove["E"] := "{u+0116}"  ; (Ė) E with dot above
 262 cmpDotAbove["f"] := "{u+1e1f}"  ; (ḟ) f with dot above
 263 cmpDotAbove["F"] := "{u+1e1e}"  ; (Ḟ) F with dot above
 264 cmpDotAbove["g"] := "{u+0121}"  ; (ġ) g with dot above
 265 cmpDotAbove["G"] := "{u+0120}"  ; (Ġ) G with dot above
 266 cmpDotAbove["h"] := "{u+1e23}"  ; (ḣ) h with dot above
 267 cmpDotAbove["H"] := "{u+1e22}"  ; (Ḣ) H with dot above
 268 cmpDotAbove["i"] := "{u+0131}"  ; (ı) dotless i (Turkish, Azerbaijani)
 269 cmpDotAbove["I"] := "{u+0130}"  ; (İ) I with dot above (Turkish, Azerbaijani)
 270 cmpDotAbove["j"] := "{u+0237}"  ; (ȷ) dotless j
 271 cmpDotAbove["l"] := "{u+0140}"  ; (ŀ) l with middle dot
 272 cmpDotAbove["L"] := "{u+013f}"  ; (Ŀ) L with middle dot
 273 cmpDotAbove["m"] := "{u+1e41}"  ; (ṁ) m with dot above
 274 cmpDotAbove["M"] := "{u+1e40}"  ; (Ṁ) M with dot above
 275 cmpDotAbove["n"] := "{u+1e45}"  ; (ṅ) n with dot above
 276 cmpDotAbove["N"] := "{u+1e44}"  ; (Ṅ) N with dot above
 277 cmpDotAbove["o"] := "{u+022f}"  ; (ȯ) o with dot above
 278 cmpDotAbove["O"] := "{u+022e}"  ; (Ȯ) O with dot above
 279 cmpDotAbove["p"] := "{u+1e57}"  ; (ṗ) p with dot above
 280 cmpDotAbove["P"] := "{u+1e56}"  ; (Ṗ) P with dot above
 281 cmpDotAbove["q"] := "{u+1e9b}"  ; (ẛ) long s with dot above
 282 cmpDotAbove["r"] := "{u+1e59}"  ; (ṙ) r with dot above
 283 cmpDotAbove["R"] := "{u+1e58}"  ; (Ṙ) R with dot above
 284 cmpDotAbove["s"] := "{u+1e61}"  ; (ṡ) s with dot above
 285 cmpDotAbove["S"] := "{u+1e60}"  ; (Ṡ) S with dot above
 286 cmpDotAbove["t"] := "{u+1e6b}"  ; (ṫ) t with dot above
 287 cmpDotAbove["T"] := "{u+1e6a}"  ; (Ṫ) T with dot above
 288 cmpDotAbove["u"] := "{u+016f}"  ; (ů) u with ring above
 289 cmpDotAbove["U"] := "{u+016e}"  ; (Ů) U with ring above
 290 cmpDotAbove["w"] := "{u+1e87}"  ; (ẇ) w with dot above
 291 cmpDotAbove["W"] := "{u+1e86}"  ; (Ẇ) W with dot above
 292 cmpDotAbove["x"] := "{u+1e8b}"  ; (ẋ) x with dot above
 293 cmpDotAbove["X"] := "{u+1e8a}"  ; (Ẋ) X with dot above
 294 cmpDotAbove["y"] := "{u+1e8f}"  ; (ẏ) y with dot above
 295 cmpDotAbove["Y"] := "{u+1e8e}"  ; (Ẏ) Y with dot above
 296 cmpDotAbove["z"] := "{u+017c}"  ; (ż) z with dot above
 297 cmpDotAbove["Z"] := "{u+017b}"  ; (Ż) Z with dot above
 298
 299
 300 ; Compose :  Ring Above (o)
 301
 302 global cmpRingAbove := Map()
 303 cmpRingAbove["a"] := "{u+00e5}"  ; (å) a with ring above
 304 cmpRingAbove["A"] := "{u+00c5}"  ; (Å) A with ring above
 305 cmpRingAbove["u"] := "{u+016f}"  ; (ů) u with ring above
 306 cmpRingAbove["U"] := "{u+016e}"  ; (Ů) U with ring above
 307 cmpRingAbove["w"] := "{u+1e98}"  ; (ẘ) w with ring above
 308 cmpRingAbove["y"] := "{u+1e99}"  ; (ẙ) y with ring above
 309
 310
 311 ; Compose :  Macron and Stroke (-)
 312
 313 global cmpMacronStroke := Map()
 314 cmpMacronStroke["a"] := "{u+0101}"  ; (ā) a with macron
 315 cmpMacronStroke["A"] := "{u+0100}"  ; (Ā) A with macron
 316 cmpMacronStroke["b"] := "{u+0180}"  ; (ƀ) b with stroke
 317 cmpMacronStroke["B"] := "{u+0243}"  ; (Ƀ) B with stroke
 318 cmpMacronStroke["d"] := "{u+0111}"  ; (đ) d with stroke
 319 cmpMacronStroke["D"] := "{u+0110}"  ; (Đ) D with stroke
 320 cmpMacronStroke["e"] := "{u+0113}"  ; (ē) e with macron
 321 cmpMacronStroke["E"] := "{u+0112}"  ; (Ē) E with macron
 322 cmpMacronStroke["g"] := "{u+01e5}"  ; (ǥ) g with stroke (Skolt Sami)
 323 cmpMacronStroke["G"] := "{u+01e4}"  ; (Ǥ) G with stroke (Skolt Sami)
 324 cmpMacronStroke["h"] := "{u+0127}"  ; (ħ) h with stroke (Maltese)
 325 cmpMacronStroke["H"] := "{u+0126}"  ; (Ħ) H with stroke (Maltese)
 326 cmpMacronStroke["i"] := "{u+012b}"  ; (ī) i with macron
 327 cmpMacronStroke["I"] := "{u+012a}"  ; (Ī) I with macron
 328 cmpMacronStroke["j"] := "{u+0249}"  ; (ɉ) j with stroke
 329 cmpMacronStroke["J"] := "{u+0248}"  ; (Ɉ) J with stroke
 330 cmpMacronStroke["l"] := "{u+0142}"  ; (ł) l with stroke
 331 cmpMacronStroke["L"] := "{u+0141}"  ; (Ł) L with stroke
 332 cmpMacronStroke["o"] := "{u+014d}"  ; (ō) o with macron
 333 cmpMacronStroke["O"] := "{u+014c}"  ; (Ō) O with macron
 334 cmpMacronStroke["p"] := "{u+1d7d}"  ; (ᵽ) p with stroke
 335 cmpMacronStroke["P"] := "{u+2c63}"  ; (Ᵽ) P with stroke
 336 cmpMacronStroke["q"] := "{u+01ed}"  ; (ǭ) o with ogonek and macron
 337 cmpMacronStroke["Q"] := "{u+01ec}"  ; (Ǭ) O with ogonek and macron
 338 cmpMacronStroke["r"] := "{u+024d}"  ; (ɍ) r with stroke
 339 cmpMacronStroke["R"] := "{u+024c}"  ; (Ɍ) R with stroke
 340 cmpMacronStroke["t"] := "{u+0167}"  ; (ŧ) t with stroke
 341 cmpMacronStroke["T"] := "{u+0166}"  ; (Ŧ) T with stroke
 342 cmpMacronStroke["u"] := "{u+016b}"  ; (ū) u with macron
 343 cmpMacronStroke["U"] := "{u+016a}"  ; (Ū) U with macron
 344 cmpMacronStroke["y"] := "{u+0233}"  ; (ȳ) y with macron
 345 cmpMacronStroke["Y"] := "{u+0232}"  ; (Ȳ) Y with macron
 346 cmpMacronStroke["z"] := "{u+01b6}"  ; (ƶ) z with stroke
 347 cmpMacronStroke["Z"] := "{u+01b5}"  ; (Ƶ) Z with stroke
 348
 349
 350 ; Compose :  Macron and Stroke (additional) (_)
 351
 352 global cmpMacronStrokeAdd := Map()
 353 cmpMacronStrokeAdd["f"] := "{u+1e9d}"  ; (ẝ) long s with high stroke
 354 cmpMacronStrokeAdd["g"] := "{u+1e21}"  ; (ḡ) g with macron
 355 cmpMacronStrokeAdd["G"] := "{u+1e20}"  ; (Ḡ) G with macron
 356 cmpMacronStrokeAdd["i"] := "{u+0268}"  ; (ɨ) i with stroke
 357 cmpMacronStrokeAdd["I"] := "{u+0197}"  ; (Ɨ) I with stroke
 358 cmpMacronStrokeAdd["l"] := "{u+019a}"  ; (ƚ) l with bar
 359 cmpMacronStrokeAdd["L"] := "{u+023d}"  ; (Ƚ) L with bar
 360 cmpMacronStrokeAdd["o"] := "{u+0275}"  ; (ɵ) barred o
 361 cmpMacronStrokeAdd["O"] := "{u+019f}"  ; (Ɵ) O with middle tilde
 362 cmpMacronStrokeAdd["q"] := "{u+01e3}"  ; (ǣ) ae with macron
 363 cmpMacronStrokeAdd["Q"] := "{u+01e2}"  ; (Ǣ) AE with macron
 364 cmpMacronStrokeAdd["u"] := "{u+0289}"  ; (ʉ) u with bar
 365 cmpMacronStrokeAdd["U"] := "{u+0244}"  ; (Ʉ) U with bar
 366 cmpMacronStrokeAdd["y"] := "{u+024f}"  ; (ɏ) y with stroke
 367 cmpMacronStrokeAdd["Y"] := "{u+024e}"  ; (Ɏ) Y with stroke
 368
 369
 370 ; Compose :  Oblique/Diagonal Stroke (/)
 371
 372 global cmpStroke := Map()
 373 cmpStroke["a"] := "{u+2c65}"  ; (ⱥ) a with stroke
 374 cmpStroke["A"] := "{u+023a}"  ; (Ⱥ) A with stroke
 375 cmpStroke["c"] := "{u+023c}"  ; (ȼ) c with stroke
 376 cmpStroke["C"] := "{u+023b}"  ; (Ȼ) C with stroke
 377 cmpStroke["e"] := "{u+0247}"  ; (ɇ) e with stroke
 378 cmpStroke["E"] := "{u+0246}"  ; (Ɇ) E with stroke
 379 cmpStroke["f"] := "{u+1e9c}"  ; (ẜ) long s with diagonal stroke
 380 cmpStroke["g"] := "{u+a7a1}"  ; (ꞡ) g with oblique stroke
 381 cmpStroke["G"] := "{u+a7a0}"  ; (Ꞡ) G with oblique stroke
 382 cmpStroke["k"] := "{u+a7a3}"  ; (ꞣ) k with oblique stroke
 383 cmpStroke["K"] := "{u+a7a2}"  ; (Ꞣ) K with oblique stroke
 384 cmpStroke["l"] := "{u+0142}"  ; (ł) l with stroke
 385 cmpStroke["L"] := "{u+0141}"  ; (Ł) L with stroke
 386 cmpStroke["n"] := "{u+a7a5}"  ; (ꞥ) n with oblique stroke
 387 cmpStroke["N"] := "{u+a7a4}"  ; (Ꞥ) N with oblique stroke
 388 cmpStroke["o"] := "{u+00f8}"  ; (ø) o with stroke
 389 cmpStroke["O"] := "{u+00d8}"  ; (Ø) O with stroke
 390 cmpStroke["r"] := "{u+a7a7}"  ; (ꞧ) r with oblique stroke
 391 cmpStroke["R"] := "{u+a7a6}"  ; (Ꞧ) R with oblique stroke
 392 cmpStroke["s"] := "{u+a7a9}"  ; (ꞩ) s with oblique stroke
 393 cmpStroke["S"] := "{u+a7a8}"  ; (Ꞩ) S with oblique stroke
 394 cmpStroke["t"] := "{u+2c66}"  ; (ⱦ) t with stroke
 395 cmpStroke["T"] := "{u+023e}"  ; (Ⱦ) T with stroke
 396
 397
 398 ; Compose :  Breve and Special Letters (b)
 399
 400 global cmpBreveSpecial := Map()
 401 cmpBreveSpecial["a"] := "{u+0103}"  ; (ă) a with breve
 402 cmpBreveSpecial["A"] := "{u+0102}"  ; (Ă) A with breve
 403 cmpBreveSpecial["d"] := "{u+0256}"  ; (ɖ) small letter d with tail
 404 cmpBreveSpecial["D"] := "{u+0189}"  ; (Ɖ) capital letter African D
 405 cmpBreveSpecial["e"] := "{u+0115}"  ; (ĕ) e with breve
 406 cmpBreveSpecial["E"] := "{u+0114}"  ; (Ĕ) E with breve
 407 cmpBreveSpecial["f"] := "{u+0259}"  ; (ə) small letter schwa (Azerbaijani)
 408 cmpBreveSpecial["F"] := "{u+018f}"  ; (Ə) capital letter schwa (Azerbaijani)
 409 cmpBreveSpecial["g"] := "{u+011f}"  ; (ğ) g with breve
 410 cmpBreveSpecial["G"] := "{u+011e}"  ; (Ğ) G with breve
 411 cmpBreveSpecial["i"] := "{u+012d}"  ; (ĭ) i with breve
 412 cmpBreveSpecial["I"] := "{u+012c}"  ; (Ĭ) I with breve
 413 cmpBreveSpecial["o"] := "{u+014f}"  ; (ŏ) o with breve
 414 cmpBreveSpecial["O"] := "{u+014e}"  ; (Ŏ) O with breve
 415 cmpBreveSpecial["s"] := "{u+0219}"  ; (ș) s with comma below (Romanian)
 416 cmpBreveSpecial["S"] := "{u+0218}"  ; (Ș) S with comma below (Romanian)
 417 cmpBreveSpecial["t"] := "{u+021b}"  ; (ț) t with comma below (Romanian)
 418 cmpBreveSpecial["T"] := "{u+021a}"  ; (Ț) T with comma below (Romanian)
 419 cmpBreveSpecial["u"] := "{u+016d}"  ; (ŭ) u with breve
 420 cmpBreveSpecial["U"] := "{u+016c}"  ; (Ŭ) U with breve
 421 cmpBreveSpecial["w"] := "{u+01bf}"  ; (ƿ) small letter wynn
 422 cmpBreveSpecial["W"] := "{u+01f7}"  ; (Ƿ) capital letter wynn
 423 cmpBreveSpecial["y"] := "{u+021d}"  ; (ȝ) small letter yogh
 424 cmpBreveSpecial["Y"] := "{u+021c}"  ; (Ȝ) capital letter yogh
 425 cmpBreveSpecial["3"] := "{u+0292}"  ; (ʒ) small letter ezh
 426 cmpBreveSpecial["#"] := "{u+01b7}"  ; (Ʒ) capital letter ezh
 427
 428
 429 ; Compose :  Double Acute Accent (=)
 430
 431 global cmpDoubleAcute := Map()
 432 cmpDoubleAcute["o"] := "{u+0151}"  ; (ő) o with double acute
 433 cmpDoubleAcute["O"] := "{u+0150}"  ; (Ő) O with double acute
 434 cmpDoubleAcute["u"] := "{u+0171}"  ; (ű) u with double acute
 435 cmpDoubleAcute["U"] := "{u+0170}"  ; (Ű) U with double acute
 436
 437
 438 ; Compose :  Hook, Horn and Variations (h)
 439
 440 global cmpSmallH := Map()
 441 cmpSmallH["b"] := "{u+0253}"  ; (ɓ) b with hook
 442 cmpSmallH["B"] := "{u+0181}"  ; (Ɓ) B with hook
 443 cmpSmallH["c"] := "{u+0188}"  ; (ƈ) c with hook
 444 cmpSmallH["C"] := "{u+0187}"  ; (Ƈ) C with hook
 445 cmpSmallH["d"] := "{u+0257}"  ; (ɗ) d with hook
 446 cmpSmallH["D"] := "{u+018a}"  ; (Ɗ) D with hook
 447 cmpSmallH["e"] := "{u+025a}"  ; (ɚ) small letter schwa with hook
 448 cmpSmallH["f"] := "{u+0192}"  ; (ƒ) f with hook
 449 cmpSmallH["F"] := "{u+0191}"  ; (Ƒ) F with hook
 450 cmpSmallH["g"] := "{u+0260}"  ; (ɠ) g with hook
 451 cmpSmallH["G"] := "{u+0193}"  ; (Ɠ) G with hook
 452 cmpSmallH["h"] := "{u+0266}"  ; (ɦ) h with hook
 453 cmpSmallH["H"] := "{u+a7aa}"  ; (Ɦ) H with hook
 454 cmpSmallH["j"] := "{u+0267}"  ; (ɧ) small letter heng with hook
 455 cmpSmallH["k"] := "{u+0199}"  ; (ƙ) k with hook
 456 cmpSmallH["K"] := "{u+0198}"  ; (Ƙ) K with hook
 457 cmpSmallH["l"] := "{u+026c}"  ; (ɬ) l with belt
 458 cmpSmallH["L"] := "{u+a7ad}"  ; (Ɬ) L with belt
 459 cmpSmallH["m"] := "{u+0271}"  ; (ɱ) m with hook
 460 cmpSmallH["M"] := "{u+2c6e}"  ; (Ɱ) M with hook
 461 cmpSmallH["n"] := "{u+0272}"  ; (ɲ) n with left hook
 462 cmpSmallH["N"] := "{u+019d}"  ; (Ɲ) N with left hook
 463 cmpSmallH["o"] := "{u+01a1}"  ; (ơ) o with horn
 464 cmpSmallH["O"] := "{u+01a0}"  ; (Ơ) O with horn
 465 cmpSmallH["p"] := "{u+01a5}"  ; (ƥ) p with hook
 466 cmpSmallH["P"] := "{u+01a4}"  ; (Ƥ) P with hook
 467 cmpSmallH["q"] := "{u+024b}"  ; (ɋ) q with hook tail
 468 cmpSmallH["Q"] := "{u+024a}"  ; (Ɋ) Q with hook tail
 469 cmpSmallH["r"] := "{u+027d}"  ; (ɽ) r with tail
 470 cmpSmallH["R"] := "{u+2c64}"  ; (Ɽ) R with tail
 471 cmpSmallH["s"] := "{u+0282}"  ; (ʂ) s with hook
 472 cmpSmallH["t"] := "{u+01ad}"  ; (ƭ) t with hook
 473 cmpSmallH["T"] := "{u+01ac}"  ; (Ƭ) T with hook
 474 cmpSmallH["u"] := "{u+01b0}"  ; (ư) u with horn
 475 cmpSmallH["U"] := "{u+01af}"  ; (Ư) U with horn
 476 cmpSmallH["v"] := "{u+028b}"  ; (ʋ) v with hook
 477 cmpSmallH["V"] := "{u+01b2}"  ; (Ʋ) V with hook
 478 cmpSmallH["w"] := "{u+2c73}"  ; (ⱳ) w with hook
 479 cmpSmallH["W"] := "{u+2c72}"  ; (Ⱳ) W with hook
 480 cmpSmallH["y"] := "{u+01b4}"  ; (ƴ) y with hook
 481 cmpSmallH["Y"] := "{u+01b3}"  ; (Ƴ) Y with hook
 482 cmpSmallH["z"] := "{u+0225}"  ; (ȥ) z with hook
 483 cmpSmallH["Z"] := "{u+0224}"  ; (Ȥ) Z with hook
 484
 485
 486 ; Compose :  Retroflex Hook and Variations (f)
 487
 488 global cmpSmallF := Map()
 489 cmpSmallF["d"] := "{u+1d91}"  ; (ᶑ) d with hook and tail
 490 cmpSmallF["e"] := "{u+025d}"  ; (ɝ) small letter reversed open e with hook
 491 cmpSmallF["f"] := "{u+1d94}"  ; (ᶔ) small letter reversed open e with retroflex hook
 492 cmpSmallF["g"] := "{u+ab36}"  ; (ꬶ) small letter script g with crossed-tail
 493 cmpSmallF["h"] := "{u+a727}"  ; (ꜧ) small letter heng
 494 cmpSmallF["H"] := "{u+a726}"  ; (Ꜧ) capital letter heng
 495 cmpSmallF["j"] := "{u+029d}"  ; (ʝ) j with crossed-tail
 496 cmpSmallF["J"] := "{u+a7b2}"  ; (Ʝ) J with crossed-tail
 497 cmpSmallF["l"] := "{u+026d}"  ; (ɭ) l with retroflex hook
 498 cmpSmallF["n"] := "{u+0273}"  ; (ɳ) n with retroflex hook
 499 cmpSmallF["q"] := "{u+02a0}"  ; (ʠ) q with hook
 500 cmpSmallF["r"] := "{u+027e}"  ; (ɾ) r with fishhook
 501 cmpSmallF["t"] := "{u+0288}"  ; (ʈ) t with retroflex hook
 502 cmpSmallF["T"] := "{u+01ae}"  ; (Ʈ) T with retroflex hook
 503 cmpSmallF["v"] := "{u+2c71}"  ; (ⱱ) v with right hook
 504 cmpSmallF["z"] := "{u+0290}"  ; (ʐ) z with retroflex hook
 505
 506
 507 ; Compose :  Swash Tail and Variations (t)
 508
 509 global cmpSmallT := Map()
 510 cmpSmallT["l"] := "{u+2c61}"  ; (ⱡ) l with double bar
 511 cmpSmallT["L"] := "{u+2c60}"  ; (Ⱡ) L with double bar
 512 cmpSmallT["s"] := "{u+023f}"  ; (ȿ) s with swash tail
 513 cmpSmallT["S"] := "{u+2c7e}"  ; (Ȿ) S with swash tail
 514 cmpSmallT["z"] := "{u+0240}"  ; (ɀ) z with swash tail
 515 cmpSmallT["Z"] := "{u+2c7f}"  ; (Ɀ) Z with swash tail
 516
 517
 518 ; Compose :  Latin Greek Letters and Variations (l)
 519
 520 global cmpSmallL := Map()
 521 cmpSmallL["a"] := "{u+0251}"  ; (ɑ) Latin small letter alpha
 522 cmpSmallL["A"] := "{u+2c6d}"  ; (Ɑ) Latin capital letter alpha
 523 cmpSmallL["b"] := "{u+025e}"  ; (ɞ) small letter closed reversed open e
 524 cmpSmallL["d"] := "{u+1e9f}"  ; (ẟ) Latin small letter delta
 525 cmpSmallL["e"] := "{u+025b}"  ; (ɛ) small letter open e (Latin small epsilon)
 526 cmpSmallL["E"] := "{u+0190}"  ; (Ɛ) capital letter open E (Latin capital epsilon)
 527 cmpSmallL["f"] := "{u+0278}"  ; (ɸ) Latin small letter phi
 528 cmpSmallL["g"] := "{u+0261}"  ; (ɡ) small letter script g
 529 cmpSmallL["G"] := "{u+a7ac}"  ; (Ɡ) capital letter script G
 530 cmpSmallL["h"] := "{u+01a3}"  ; (ƣ) small letter gha
 531 cmpSmallL["H"] := "{u+01a2}"  ; (Ƣ) capital letter gha
 532 cmpSmallL["i"] := "{u+0269}"  ; (ɩ) Latin small letter iota
 533 cmpSmallL["I"] := "{u+0196}"  ; (Ɩ) Latin capital letter iota
 534 cmpSmallL["j"] := "{u+0263}"  ; (ɣ) Latin small letter gamma
 535 cmpSmallL["J"] := "{u+0194}"  ; (Ɣ) Latin capital letter gamma
 536 cmpSmallL["k"] := "{u+0138}"  ; (ĸ) small letter kra
 537 cmpSmallL["l"] := "{u+019b}"  ; (ƛ) Latin small letter lambda with stroke (barred lambda)
 538 cmpSmallL["m"] := "{u+0270}"  ; (ɰ) small letter turned m with long leg
 539 cmpSmallL["n"] := "{u+019e}"  ; (ƞ) small letter n with long right leg
 540 cmpSmallL["N"] := "{u+0220}"  ; (Ƞ) capital letter N with long right leg
 541 cmpSmallL["o"] := "{u+0254}"  ; (ɔ) small letter open o
 542 cmpSmallL["O"] := "{u+0186}"  ; (Ɔ) capital letter open O
 543 cmpSmallL["q"] := "{u+0277}"  ; (ɷ) Latin small letter closed omega
 544 cmpSmallL["s"] := "{u+0283}"  ; (ʃ) Latin small letter esh
 545 cmpSmallL["S"] := "{u+01a9}"  ; (Ʃ) Latin capital letter esh
 546 cmpSmallL["u"] := "{u+028a}"  ; (ʊ) Latin small letter upsilon
 547 cmpSmallL["U"] := "{u+01b1}"  ; (Ʊ) Latin capital letter upsilon
 548 cmpSmallL["8"] := "{u+0223}"  ; (ȣ) small letter ou
 549 cmpSmallL["*"] := "{u+0222}"  ; (Ȣ) capital letter OU
 550 cmpSmallL["7"] := "{u+0242}"  ; (ɂ) small letter glottal stop
 551 cmpSmallL["&"] := "{u+0241}"  ; (Ɂ) capital letter glottal stop
 552 cmpSmallL["?"] := "{u+0294}"  ; (ʔ) unicase letter glottal stop
 553
 554
 555 ; Compose :  Turned and Reversed Letters (r)
 556
 557 global cmpSmallR := Map()
 558 cmpSmallR["a"] := "{u+0250}"  ; (ɐ) small letter turned a
 559 cmpSmallR["A"] := "{u+2c6f}"  ; (Ɐ) capital letter turned A
 560 cmpSmallR["b"] := "{u+025c}"  ; (ɜ) small letter reversed open e
 561 cmpSmallR["B"] := "{u+a7ab}"  ; (Ɜ) capital letter reversed open E
 562 cmpSmallR["d"] := "{u+018d}"  ; (ƍ) Latin small letter turned delta
 563 cmpSmallR["e"] := "{u+01dd}"  ; (ǝ) small letter turned e
 564 cmpSmallR["E"] := "{u+018e}"  ; (Ǝ) capital letter reversed E
 565 cmpSmallR["f"] := "{u+0258}"  ; (ɘ) small letter reversed e
 566 cmpSmallR["g"] := "{u+1d77}"  ; (ᵷ) small letter turned g
 567 cmpSmallR["G"] := "{u+2141}"  ; (⅁) capital letter turned G
 568 cmpSmallR["h"] := "{u+0265}"  ; (ɥ) small letter turned h
 569 cmpSmallR["H"] := "{u+a78d}"  ; (Ɥ) capital letter turned H
 570 cmpSmallR["i"] := "{u+1d09}"  ; (ᴉ) small letter turned i
 571 cmpSmallR["k"] := "{u+029e}"  ; (ʞ) small letter turned k
 572 cmpSmallR["K"] := "{u+a7b0}"  ; (Ʞ) capital letter turned K
 573 cmpSmallR["m"] := "{u+026f}"  ; (ɯ) small letter turned m
 574 cmpSmallR["M"] := "{u+019c}"  ; (Ɯ) capital letter turned M
 575 cmpSmallR["o"] := "{u+0264}"  ; (ɤ) small letter ram's horn (baby gamma)
 576 cmpSmallR["q"] := "{u+0252}"  ; (ɒ) Latin small letter turned alpha
 577 cmpSmallR["Q"] := "{u+2c70}"  ; (Ɒ) Latin capital letter turned alpha
 578 cmpSmallR["r"] := "{u+0279}"  ; (ɹ) small letter turned r
 579 cmpSmallR["t"] := "{u+0287}"  ; (ʇ) small letter turned t
 580 cmpSmallR["T"] := "{u+a7b1}"  ; (Ʇ) small letter turned T
 581 cmpSmallR["v"] := "{u+028c}"  ; (ʌ) small letter turned v
 582 cmpSmallR["V"] := "{u+0245}"  ; (Ʌ) capital letter turned V
 583 cmpSmallR["w"] := "{u+028d}"  ; (ʍ) small letter turned w
 584 cmpSmallR["y"] := "{u+028e}"  ; (ʎ) small letter turned y
 585 cmpSmallR["z"] := "{u+01b9}"  ; (ƹ) Latin small letter ezh reversed
 586 cmpSmallR["Z"] := "{u+01b8}"  ; (Ƹ) Latin capital letter ezh reversed
 587
 588
 589 ; Compose :  Currency Symbols ($)
 590
 591 global cmpCurrency := Map()
 592 cmpCurrency["a"] := "{u+058f}"  ; (֏) Armenian dram
 593 cmpCurrency["A"] := "{u+20b3}"  ; (₳) Argentine austral
 594 cmpCurrency["b"] := "{u+20bf}"  ; (₿) bitcoin
 595 cmpCurrency["B"] := "{u+0e3f}"  ; (฿) Thai baht
 596 cmpCurrency["c"] := "{u+20a1}"  ; (₡) Costa Rican colón
 597 cmpCurrency["C"] := "{u+20b5}"  ; (₵) Ghanaian cedi
 598 cmpCurrency["d"] := "{u+20ab}"  ; (₫) Vietnamese dong
 599 cmpCurrency["D"] := "{u+20af}"  ; (₯) Greek drachma
 600 cmpCurrency["e"] := "{u+20ac}"  ; (€) euro sign
 601 cmpCurrency["E"] := "{u+20a0}"  ; (₠) euro-currency sign
 602 cmpCurrency["f"] := "{u+20a3}"  ; (₣) French franc
 603 cmpCurrency["F"] := "{u+20a3}"  ; (₣) French franc
 604 cmpCurrency["g"] := "{u+20b2}"  ; (₲) Paraguayan guaraní
 605 cmpCurrency["G"] := "{u+20be}"  ; (₾) Georgian lari
 606 cmpCurrency["h"] := "{u+20b4}"  ; (₴) Ukrainian hryvnia
 607 cmpCurrency["H"] := "{u+20b4}"  ; (₴) Ukrainian hryvnia
 608 cmpCurrency["i"] := "{u+20a4}"  ; (₤) lira
 609 cmpCurrency["I"] := "{u+20b6}"  ; (₶) livre tournois
 610 cmpCurrency["k"] := "{u+20ad}"  ; (₭) Laotian kip
 611 cmpCurrency["K"] := "{u+20ad}"  ; (₭) Laotian kip
 612 cmpCurrency["l"] := "{u+20ba}"  ; (₺) Turkish lira
 613 cmpCurrency["L"] := "{u+00a3}"  ; (£) pound sign
 614 cmpCurrency["m"] := "{u+20bc}"  ; (₼) Azerbaijani manat
 615 cmpCurrency["M"] := "{u+20a5}"  ; (₥) mill sign
 616 cmpCurrency["n"] := "{u+20a6}"  ; (₦) Nigerian naira
 617 cmpCurrency["N"] := "{u+20bb}"  ; (₻) Nordic mark
 618 cmpCurrency["o"] := "{u+00a2}"  ; (¢) cent sign (dollar)
 619 cmpCurrency["p"] := "{u+20b1}"  ; (₱) Philippine peso
 620 cmpCurrency["P"] := "{u+20a7}"  ; (₧) Spanish pesetas
 621 cmpCurrency["r"] := "{u+20b9}"  ; (₹) Indian rupee
 622 cmpCurrency["R"] := "{u+20bd}"  ; (₽) Russian ruble
 623 cmpCurrency["s"] := "{u+20aa}"  ; (₪) Israeli new shekel
 624 cmpCurrency["S"] := "{u+20b7}"  ; (₷) spesmilo
 625 cmpCurrency["t"] := "{u+20ae}"  ; (₮) Mongolian tögrög (tugrik)
 626 cmpCurrency["T"] := "{u+20b8}"  ; (₸) Kazakh tenge
 627 cmpCurrency["u"] := "{u+20a8}"  ; (₨) rupee sign
 628 cmpCurrency["U"] := "{u+20a2}"  ; (₢) Brazilian cruzeiro
 629 cmpCurrency["w"] := "{u+20a9}"  ; (₩) South Korean won
 630 cmpCurrency["W"] := "{u+20a9}"  ; (₩) South Korean won
 631 cmpCurrency["x"] := "{u+00a4}"  ; (¤) currency sign
 632 cmpCurrency["y"] := "{u+00a5}"  ; (¥) yen sign
 633 cmpCurrency["Y"] := "{u+00a5}"  ; (¥) yen sign
 634
 635
 636 ; Compose :  Greek Alphabet (g)
 637
 638 global cmpGreek := Map()
 639 cmpGreek["a"] := "{u+03b1}"  ; (α) Greek small alpha
 640 cmpGreek["A"] := "{u+0391}"  ; (Α) Greek capital alpha
 641 cmpGreek["b"] := "{u+03b2}"  ; (β) Greek small beta
 642 cmpGreek["B"] := "{u+0392}"  ; (Β) Greek capital beta
 643 cmpGreek["v"] := "{u+03b2}"  ; (β) Greek small beta
 644 cmpGreek["V"] := "{u+0392}"  ; (Β) Greek capital beta
 645 cmpGreek["g"] := "{u+03b3}"  ; (γ) Greek small gamma
 646 cmpGreek["G"] := "{u+0393}"  ; (Γ) Greek capital gamma
 647 cmpGreek["d"] := "{u+03b4}"  ; (δ) Greek small delta
 648 cmpGreek["D"] := "{u+0394}"  ; (Δ) Greek capital delta
 649 cmpGreek["e"] := "{u+03b5}"  ; (ε) Greek small epsilon
 650 cmpGreek["E"] := "{u+0395}"  ; (Ε) Greek capital epsilon
 651 cmpGreek["z"] := "{u+03b6}"  ; (ζ) Greek small zeta
 652 cmpGreek["Z"] := "{u+0396}"  ; (Ζ) Greek capital zeta
 653 cmpGreek["h"] := "{u+03b7}"  ; (η) Greek small eta
 654 cmpGreek["H"] := "{u+0397}"  ; (Η) Greek capital eta
 655 cmpGreek["j"] := "{u+03b8}"  ; (θ) Greek small theta
 656 cmpGreek["J"] := "{u+0398}"  ; (Θ) Greek capital theta
 657 cmpGreek["i"] := "{u+03b9}"  ; (ι) Greek small iota
 658 cmpGreek["I"] := "{u+0399}"  ; (Ι) Greek capital iota
 659 cmpGreek["k"] := "{u+03ba}"  ; (κ) Greek small kappa
 660 cmpGreek["K"] := "{u+039a}"  ; (Κ) Greek capital kappa
 661 cmpGreek["l"] := "{u+03bb}"  ; (λ) Greek small lambda
 662 cmpGreek["L"] := "{u+039b}"  ; (Λ) Greek capital lambda
 663 cmpGreek["m"] := "{u+03bc}"  ; (μ) Greek small mu
 664 cmpGreek["M"] := "{u+039c}"  ; (Μ) Greek capital mu
 665 cmpGreek["n"] := "{u+03bd}"  ; (ν) Greek small nu
 666 cmpGreek["N"] := "{u+039d}"  ; (Ν) Greek capital nu
 667 cmpGreek["x"] := "{u+03be}"  ; (ξ) Greek small xi
 668 cmpGreek["X"] := "{u+039e}"  ; (Ξ) Greek capital xi
 669 cmpGreek["o"] := "{u+03bf}"  ; (ο) Greek small omicron
 670 cmpGreek["O"] := "{u+039f}"  ; (Ο) Greek capital omicron
 671 cmpGreek["p"] := "{u+03c0}"  ; (π) Greek small pi
 672 cmpGreek["P"] := "{u+03a0}"  ; (Π) Greek capital pi
 673 cmpGreek["r"] := "{u+03c1}"  ; (ρ) Greek small rho
 674 cmpGreek["R"] := "{u+03a1}"  ; (Ρ) Greek capital rho
 675 cmpGreek["s"] := "{u+03c3}"  ; (σ) Greek small sigma
 676 cmpGreek[","] := "{u+03c2}"  ; (ς) Greek small final sigma
 677 cmpGreek["S"] := "{u+03a3}"  ; (Σ) Greek capital sigma
 678 cmpGreek["t"] := "{u+03c4}"  ; (τ) Greek small tau
 679 cmpGreek["T"] := "{u+03a4}"  ; (Τ) Greek capital tau
 680 cmpGreek["u"] := "{u+03c5}"  ; (υ) Greek small upsilon
 681 cmpGreek["U"] := "{u+03a5}"  ; (Υ) Greek capital upsilon
 682 cmpGreek["y"] := "{u+03c5}"  ; (υ) Greek small upsilon
 683 cmpGreek["Y"] := "{u+03a5}"  ; (Υ) Greek capital upsilon
 684 cmpGreek["f"] := "{u+03c6}"  ; (φ) Greek small phi
 685 cmpGreek["F"] := "{u+03a6}"  ; (Φ) Greek capital phi
 686 cmpGreek["c"] := "{u+03c7}"  ; (χ) Greek small chi
 687 cmpGreek["C"] := "{u+03a7}"  ; (Χ) Greek capital chi
 688 cmpGreek["w"] := "{u+03c8}"  ; (ψ) Greek small psi
 689 cmpGreek["W"] := "{u+03a8}"  ; (Ψ) Greek capital psi
 690 cmpGreek["q"] := "{u+03c9}"  ; (ω) Greek small omega
 691 cmpGreek["Q"] := "{u+03a9}"  ; (Ω) Greek capital omega
 692
 693
 694 ; Compose :  Superscript Characters (p)
 695
 696 global cmpSuperscript := Map()
 697 cmpSuperscript["1"] := "{u+00b9}"  ; (¹) superscript 1
 698 cmpSuperscript["2"] := "{u+00b2}"  ; (²) superscript 2
 699 cmpSuperscript["3"] := "{u+00b3}"  ; (³) superscript 3
 700 cmpSuperscript["4"] := "{u+2074}"  ; (⁴) superscript 4
 701 cmpSuperscript["5"] := "{u+2075}"  ; (⁵) superscript 5
 702 cmpSuperscript["6"] := "{u+2076}"  ; (⁶) superscript 6
 703 cmpSuperscript["7"] := "{u+2077}"  ; (⁷) superscript 7
 704 cmpSuperscript["8"] := "{u+2078}"  ; (⁸) superscript 8
 705 cmpSuperscript["9"] := "{u+2079}"  ; (⁹) superscript 9
 706 cmpSuperscript["0"] := "{u+2070}"  ; (⁰) superscript 0
 707 cmpSuperscript["i"] := "{u+2071}"  ; (ⁱ) superscript i
 708 cmpSuperscript["n"] := "{u+207f}"  ; (ⁿ) superscript n
 709 cmpSuperscript["+"] := "{u+207a}"  ; (⁺) superscript +
 710 cmpSuperscript["-"] := "{u+207b}"  ; (⁻) superscript -
 711 cmpSuperscript["="] := "{u+207c}"  ; (⁼) superscript =
 712 cmpSuperscript["("] := "{u+207d}"  ; (⁽) superscript (
 713 cmpSuperscript[")"] := "{u+207e}"  ; (⁾) superscript )
 714
 715
 716 ; Compose :  Subscript Characters (u)
 717
 718 global cmpSubscript := Map()
 719 cmpSubscript["1"] := "{u+2081}"  ; (₁) subscript 1
 720 cmpSubscript["2"] := "{u+2082}"  ; (₂) subscript 2
 721 cmpSubscript["3"] := "{u+2083}"  ; (₃) subscript 3
 722 cmpSubscript["4"] := "{u+2084}"  ; (₄) subscript 4
 723 cmpSubscript["5"] := "{u+2085}"  ; (₅) subscript 5
 724 cmpSubscript["6"] := "{u+2086}"  ; (₆) subscript 6
 725 cmpSubscript["7"] := "{u+2087}"  ; (₇) subscript 7
 726 cmpSubscript["8"] := "{u+2088}"  ; (₈) subscript 8
 727 cmpSubscript["9"] := "{u+2089}"  ; (₉) subscript 9
 728 cmpSubscript["0"] := "{u+2080}"  ; (₀) subscript 0
 729 cmpSubscript["a"] := "{u+2090}"  ; (ₐ) subscript a
 730 cmpSubscript["b"] := "{u+1d66}"  ; (ᵦ) subscript beta
 731 cmpSubscript["c"] := "{u+1d6a}"  ; (ᵪ) subscript chi
 732 cmpSubscript["e"] := "{u+2091}"  ; (ₑ) subscript e
 733 cmpSubscript["E"] := "{u+2094}"  ; (ₔ) subscript schwa
 734 cmpSubscript["f"] := "{u+1d69}"  ; (ᵩ) subscript phi
 735 cmpSubscript["g"] := "{u+1d67}"  ; (ᵧ) subscript gamma
 736 cmpSubscript["h"] := "{u+2095}"  ; (ₕ) subscript h
 737 cmpSubscript["i"] := "{u+1d62}"  ; (ᵢ) subscript i
 738 cmpSubscript["j"] := "{u+2c7c}"  ; (ⱼ) subscript j
 739 cmpSubscript["k"] := "{u+2096}"  ; (ₖ) subscript k
 740 cmpSubscript["l"] := "{u+2097}"  ; (ₗ) subscript l
 741 cmpSubscript["m"] := "{u+2098}"  ; (ₘ) subscript m
 742 cmpSubscript["n"] := "{u+2099}"  ; (ₙ) subscript n
 743 cmpSubscript["o"] := "{u+2092}"  ; (ₒ) subscript o
 744 cmpSubscript["p"] := "{u+209a}"  ; (ₚ) subscript p
 745 cmpSubscript["r"] := "{u+1d63}"  ; (ᵣ) subscript r
 746 cmpSubscript["R"] := "{u+1d68}"  ; (ᵨ) subscript rho
 747 cmpSubscript["s"] := "{u+209b}"  ; (ₛ) subscript s
 748 cmpSubscript["t"] := "{u+209c}"  ; (ₜ) subscript t
 749 cmpSubscript["u"] := "{u+1d64}"  ; (ᵤ) subscript u
 750 cmpSubscript["v"] := "{u+1d65}"  ; (ᵥ) subscript v
 751 cmpSubscript["x"] := "{u+2093}"  ; (ₓ) subscript x
 752 cmpSubscript["+"] := "{u+208a}"  ; (₊) subscript +
 753 cmpSubscript["-"] := "{u+208b}"  ; (₋) subscript -
 754 cmpSubscript["="] := "{u+208c}"  ; (₌) subscript =
 755 cmpSubscript["("] := "{u+208d}"  ; (₍) subscript (
 756 cmpSubscript[")"] := "{u+208e}"  ; (₎) subscript )
 757
 758
 759 ; Compose :  Spacing Characters and Dashes
 760
 761 global cmpSpace := Map()
 762 global cmpQuad := Map()
 763 cmpSpace["1"] := "{u+2004}"  ; three-per-em space
 764 cmpSpace["2"] := "{u+2002}"  ; en space
 765 cmpSpace["3"] := "{u+2003}"  ; em space
 766 cmpSpace["4"] := "{u+2005}"  ; four-per-em space
 767 cmpSpace["5"] := "{u+2008}"  ; punctuation space
 768 cmpSpace["6"] := "{u+2006}"  ; six-per-em space
 769 cmpSpace["7"] := "{u+2009}"  ; thin space
 770 cmpSpace["8"] := "{u+200a}"  ; hair space
 771 cmpSpace["9"] := "{u+2007}"  ; figure space
 772 cmpSpace["0"] := "{u+200b}"  ; zero-width space (ZWSP)
 773 cmpSpace["m"] := "{u+205f}"  ; medium mathematical space (MMSP)
 774 cmpSpace["n"] := "{u+202f}"  ; narrow no-break space (NNBSP)
 775 cmpSpace[" "] := "{u+00a0}"  ; non-breaking space (NBSP)
 776 cmpMacronStroke["2"] := "{u+2013}"  ; (–) en dash
 777 cmpMacronStroke["3"] := "{u+2014}"  ; (—) em dash
 778 cmpMacronStroke["4"] := "{u+2015}"  ; (―) horizontal bar
 779 cmpMacronStroke["5"] := "{u+2010}"  ; (‐) hyphen
 780 cmpMacronStroke["9"] := "{u+2012}"  ; (‒) figure dash
 781 cmpMacronStroke["0"] := "{u+00ad}"  ; () soft hyphen (SHY)
 782 cmpMacronStroke["-"] := "{u+2011}"  ; (‑) non-breaking hyphen
 783 cmpQuad["2"] := "{u+2000}"  ; en quad
 784 cmpQuad["3"] := "{u+2001}"  ; em quad
 785
 786
 787 ; Compose :  Arrows and Pointing Triangles
 788
 789 global cmpArrow := Map()
 790 cmpArrow["w"] := "{u+25b2}"  ; (▲) black up-pointing triangle
 791 cmpArrow["a"] := "{u+25c0}"  ; (◀) black left-pointing triangle
 792 cmpArrow["s"] := "{u+25bc}"  ; (▼) black down-pointing triangle
 793 cmpArrow["d"] := "{u+25b6}"  ; (▶) black right-pointing triangle
 794 cmpArrow["i"] := "{u+25b3}"  ; (△) white up-pointing triangle
 795 cmpArrow["j"] := "{u+25c1}"  ; (◁) white left-pointing triangle
 796 cmpArrow["k"] := "{u+25bd}"  ; (▽) white down-pointing triangle
 797 cmpArrow["l"] := "{u+25b7}"  ; (▷) white right-pointing triangle
 798 cmpArrow["1"] := "{u+2199}"  ; (↙) south west arrow
 799 cmpArrow["2"] := "{u+2193}"  ; (↓) downwards arrow
 800 cmpArrow["3"] := "{u+2198}"  ; (↘) south east arrow
 801 cmpArrow["4"] := "{u+2190}"  ; (←) leftwards arrow
 802 cmpArrow["5"] := "{u+2195}"  ; (↕) up down arrow
 803 cmpArrow["6"] := "{u+2192}"  ; (→) rightwards arrow
 804 cmpArrow["7"] := "{u+2196}"  ; (↖) north west arrow
 805 cmpArrow["8"] := "{u+2191}"  ; (↑) upwards arrow
 806 cmpArrow["9"] := "{u+2197}"  ; (↗) north east arrow
 807 cmpArrow["0"] := "{u+2194}"  ; (↔) left right arrow
 808 cmpDoubleAcute["1"] := "{u+21d9}"  ; (⇙) south west double arrow
 809 cmpDoubleAcute["2"] := "{u+21d3}"  ; (⇓) downwards double arrow
 810 cmpDoubleAcute["3"] := "{u+21d8}"  ; (⇘) south east double arrow
 811 cmpDoubleAcute["4"] := "{u+21d0}"  ; (⇐) leftwards double arrow
 812 cmpDoubleAcute["5"] := "{u+21d5}"  ; (⇕) up down double arrow
 813 cmpDoubleAcute["6"] := "{u+21d2}"  ; (⇒) rightwards double arrow
 814 cmpDoubleAcute["7"] := "{u+21d6}"  ; (⇖) north west double arrow
 815 cmpDoubleAcute["8"] := "{u+21d1}"  ; (⇑) upwards double arrow
 816 cmpDoubleAcute["9"] := "{u+21d7}"  ; (⇗) north east double arrow
 817 cmpDoubleAcute["0"] := "{u+21d4}"  ; (⇔) left right double arrow
 818
 819
 820 ; Compose :  Various Symbols (s)
 821
 822 global cmpSymbols := Map()
 823 cmpSymbols["a"] := "{u+2100}"  ; (℀) account of
 824 cmpSymbols["b"] := "{u+203d}"  ; (‽) interrobang
 825 cmpSymbols["B"] := "{u+2e18}"  ; (⸘) inverted interrobang
 826 cmpSymbols["c"] := "{u+2105}"  ; (℅) care of
 827 cmpSymbols["d"] := "{u+22c4}"  ; (⋄) diamond operator
 828 cmpSymbols["e"] := "{u+212e}"  ; (℮) estimated symbol
 829 cmpSymbols["f"] := "{u+2640}"  ; (♀) female sign (Venus)
 830 cmpSymbols["h"] := "{u+2302}"  ; (⌂) house
 831 cmpSymbols["H"] := "{u+2126}"  ; (Ω) ohm sign (backwards compatibility)
 832 cmpSymbols["i"] := "{u+2300}"  ; (⌀) diameter sign
 833 cmpSymbols["j"] := "{u+2101}"  ; (℁) addressed to the subject
 834 cmpSymbols["k"] := "{u+214d}"  ; (⅍) aktieselskab
 835 cmpSymbols["l"] := "{u+2113}"  ; (ℓ) script small l
 836 cmpSymbols["L"] := "{u+2112}"  ; (ℒ) Laplace transform
 837 cmpSymbols["m"] := "{u+2642}"  ; (♂) male sign (Mars)
 838 cmpSymbols["M"] := "{u+2120}"  ; (℠) service mark
 839 cmpSymbols["p"] := "{u+211e}"  ; (℞) prescription take (Recipere)
 840 cmpSymbols["P"] := "{u+211e}"  ; (℞) prescription take (Recipere)
 841 cmpSymbols["r"] := "{u+211f}"  ; (℟) response (liturgy)
 842 cmpSymbols["R"] := "{u+211f}"  ; (℟) response (liturgy)
 843 cmpSymbols["u"] := "{u+2106}"  ; (℆) cada una (each one)
 844 cmpSymbols["v"] := "{u+2123}"  ; (℣) versicle (liturgy)
 845 cmpSymbols["V"] := "{u+2123}"  ; (℣) versicle (liturgy)
 846 cmpSymbols["x"] := "{u+203b}"  ; (※) reference mark
 847 cmpSymbols["2"] := "{u+266b}"  ; (♫) beamed eighth notes
 848 cmpSymbols["3"] := "{u+2042}"  ; (⁂) asterism
 849 cmpSymbols["4"] := "{u+203b}"  ; (※) reference mark
 850 cmpSymbols["8"] := "{u+266a}"  ; (♪) eighth note
 851 cmpSymbols["!"] := "{u+203c}"  ; (‼) double exclamation mark
 852 cmpSymbols["?"] := "{u+2e2e}"  ; (⸮) reversed question mark
 853 cmpSymbols["/"] := "{u+205e}"  ; (⁞) vertical four dots
 854 cmpSymbols["|"] := "{u+00a6}"  ; (¦) broken bar
 855
 856
 857 ; Compose :  Math Symbols (m)
 858
 859 global cmpMathSymbols := Map()
 860 cmpMathSymbols["a"] := "{u+2200}"  ; (∀) for all
 861 cmpMathSymbols["A"] := "{u+2200}"  ; (∀) for all
 862 cmpMathSymbols["b"] := "{u+2286}"  ; (⊆) subset of or equal to
 863 cmpMathSymbols["B"] := "{u+2287}"  ; (⊇) superset of or equal to
 864 cmpMathSymbols["c"] := "{u+221d}"  ; (∝) proportional to
 865 cmpMathSymbols["C"] := "{u+2102}"  ; (ℂ) complex numbers
 866 cmpMathSymbols["d"] := "{u+2206}"  ; (∆) increment operator
 867 cmpMathSymbols["D"] := "{u+2207}"  ; (∇) nabla/del operator
 868 cmpMathSymbols["e"] := "{u+2203}"  ; (∃) there exists
 869 cmpMathSymbols["E"] := "{u+2204}"  ; (∄) there does not exist
 870 cmpMathSymbols["f"] := "{u+0192}"  ; (ƒ) f with hook
 871 cmpMathSymbols["F"] := "{u+220e}"  ; (∎) end of proof
 872 cmpMathSymbols["g"] := "{u+2282}"  ; (⊂) subset of
 873 cmpMathSymbols["G"] := "{u+2284}"  ; (⊄) not a subset of
 874 cmpMathSymbols["h"] := "{u+2283}"  ; (⊃) superset of
 875 cmpMathSymbols["H"] := "{u+2285}"  ; (⊅) not a superset of
 876 cmpMathSymbols["I"] := "{u+2111}"  ; (ℑ) imaginary numbers
 877 cmpMathSymbols["j"] := "{u+2245}"  ; (≅) congruent to
 878 cmpMathSymbols["J"] := "{u+2247}"  ; (≇) not congruent to
 879 cmpMathSymbols["k"] := "{u+220b}"  ; (∋) contains as member
 880 cmpMathSymbols["K"] := "{u+220c}"  ; (∌) does not contain as member
 881 cmpMathSymbols["l"] := "{u+2225}"  ; (∥) parallel to
 882 cmpMathSymbols["L"] := "{u+2226}"  ; (∦) not parallel to
 883 cmpMathSymbols["m"] := "{u+2208}"  ; (∈) element of
 884 cmpMathSymbols["M"] := "{u+2209}"  ; (∉) not an element of
 885 cmpMathSymbols["n"] := "{u+00ac}"  ; (¬) not sign
 886 cmpMathSymbols["N"] := "{u+2115}"  ; (ℕ) natural numbers
 887 cmpMathSymbols["o"] := "{u+2218}"  ; (∘) ring operator
 888 cmpMathSymbols["O"] := "{u+2205}"  ; (∅) empty set
 889 cmpMathSymbols["p"] := "{u+2202}"  ; (∂) partial differential
 890 cmpMathSymbols["P"] := "{u+2119}"  ; (ℙ) prime numbers
 891 cmpMathSymbols["Q"] := "{u+211a}"  ; (ℚ) rational numbers
 892 cmpMathSymbols["R"] := "{u+211d}"  ; (ℝ) real numbers
 893 cmpMathSymbols["s"] := "{u+2229}"  ; (∩) set intersection
 894 cmpMathSymbols["S"] := "{u+222b}"  ; (∫) integral symbol
 895 cmpMathSymbols["t"] := "{u+2261}"  ; (≡) identical to
 896 cmpMathSymbols["T"] := "{u+2262}"  ; (≢) not identical to
 897 cmpMathSymbols["u"] := "{u+222a}"  ; (∪) set union
 898 cmpMathSymbols["U"] := "{u+2216}"  ; (∖) set minus
 899 cmpMathSymbols["w"] := "{u+2118}"  ; (℘) Weierstrass elliptic function
 900 cmpMathSymbols["z"] := "{u+21af}"  ; (↯) downwards zigzag arrow
 901 cmpMathSymbols["Z"] := "{u+2124}"  ; (ℤ) whole numbers
 902 cmpMathSymbols["2"] := "{u+2236}"  ; (∶) ratio symbol
 903 cmpMathSymbols["4"] := "{u+2237}"  ; (∷) proportion sign
 904 cmpMathSymbols["6"] := "{u+2220}"  ; (∠) angle symbol
 905 cmpMathSymbols["9"] := "{u+221f}"  ; (∟) right angle
 906 cmpMathSymbols["0"] := "{u+2221}"  ; (∡) measured angle
 907 cmpMathSymbols[","] := "{u+2219}"  ; (∙) bullet operator
 908 cmpMathSymbols["+"] := "{u+2295}"  ; (⊕) circled plus
 909 cmpMathSymbols["-"] := "{u+2296}"  ; (⊖) circled minus
 910 cmpMathSymbols["*"] := "{u+2297}"  ; (⊗) circled times
 911 cmpMathSymbols["/"] := "{u+2298}"  ; (⊘) circled division slash
 912 cmpMathSymbols["."] := "{u+2299}"  ; (⊙) circled dot operator
 913 cmpMathSymbols["="] := "{u+225d}"  ; (≝) equal to by definition
 914 cmpMathSymbols[";"] := "{u+2235}"  ; (∵) because sign
 915 cmpMathSymbols[":"] := "{u+2234}"  ; (∴) therefore sign
 916 cmpMathSymbols["&"] := "{u+2227}"  ; (∧) logical and
 917 cmpMathSymbols["|"] := "{u+2228}"  ; (∨) logical or
 918
 919
 920 ; Compose :  Special Letters/Characters
 921
 922 global cmpCapitalA := Map()
 923 global cmpSmallD := Map()
 924 global cmpCapitalD := Map()
 925 global cmpSmallI := Map()
 926 global cmpCapitalI := Map()
 927 global cmpSmallN := Map()
 928 global cmpCapitalN := Map()
 929 global cmpCapitalO := Map()
 930 global cmpCapitalS := Map()
 931 global cmpCapitalT := Map()
 932 cmpArrow["e"] := "{u+00e6}"      ; (æ) letter ae
 933 cmpCapitalA["E"] := "{u+00c6}"   ; (Æ) letter AE
 934 cmpSmallD["h"] := "{u+00f0}"     ; (ð) small letter eth
 935 cmpCapitalD["H"] := "{u+00d0}"   ; (Ð) capital letter eth
 936 cmpSmallF["s"] := "{u+017f}"     ; (ſ) small letter long s
 937 cmpSmallI["j"] := "{u+0133}"     ; (ĳ) ligature ij
 938 cmpCapitalI["J"] := "{u+0132}"   ; (Ĳ) ligature IJ
 939 cmpSmallN["g"] := "{u+014b}"     ; (ŋ) small letter eng(ma)
 940 cmpCapitalN["G"] := "{u+014a}"   ; (Ŋ) capital letter eng(ma)
 941 cmpRingAbove["e"] := "{u+0153}"  ; (œ) ligature oe
 942 cmpCapitalO["E"] := "{u+0152}"   ; (Œ) ligature OE
 943 cmpSymbols["s"] := "{u+00df}"    ; (ß) small sharp s (Eszett)
 944 cmpCapitalS["S"] := "{u+1e9e}"   ; (ẞ) capital sharp S (capital Eszett)
 945 cmpSmallT["h"] := "{u+00fe}"     ; (þ) small letter thorn
 946 cmpCapitalT["H"] := "{u+00de}"   ; (Þ) capital letter thorn
 947
 948
 949 ; Compose :  General/Math Symbols
 950
 951 global cmpDigitEight := Map()
 952 global cmpCapitalP := Map()
 953 global cmpVerticalLine := Map()
 954 global cmpAsterisk := Map()
 955 global cmpExclam := Map()
 956 global cmpQuestion := Map()
 957 global cmpParenLeft := Map()
 958 global cmpPlus := Map()
 959 global cmpPercent := Map()
 960 global cmpLessThan := Map()
 961 global cmpGreaterThan := Map()
 962 cmpSmallD["d"] := "{u+2020}"        ; (†) dagger
 963 cmpCapitalD["D"] := "{u+2021}"      ; (‡) double dagger
 964 cmpSmallI["i"] := "{u+221e}"        ; (∞) infinity symbol
 965 cmpDigitEight["8"] := "{u+221e}"    ; (∞) infinity symbol
 966 cmpMathSymbols["i"] := "{u+00b5}"   ; (µ) micro sign
 967 cmpSmallN["o"] := "{u+2116}"        ; (№) numero sign
 968 cmpCapitalN["o"] := "{u+2116}"      ; (№) numero sign
 969 cmpRingAbove["x"] := "{u+00a4}"     ; (¤) currency sign
 970 cmpSuperscript["p"] := "{u+00b6}"   ; (¶) pilcrow sign
 971 cmpCapitalP["P"] := "{u+00b6}"      ; (¶) pilcrow sign
 972 cmpSmallR["2"] := "{u+221a}"        ; (√) square root
 973 cmpSmallR["3"] := "{u+221b}"        ; (∛) cube root
 974 cmpSmallR["4"] := "{u+221c}"        ; (∜) fourth root
 975 cmpSymbols["o"] := "{u+00a7}"       ; (§) section sign
 976 cmpCapitalS["o"] := "{u+00a7}"      ; (§) section sign
 977 cmpSmallT["m"] := "{u+2122}"        ; (™) trademark symbol
 978 cmpVerticalLine["|"] := "{u+2016}"  ; (‖) double vertical line
 979 cmpAcuteAccent["1"] := "{u+2032}"   ; (′) prime
 980 cmpAcuteAccent["2"] := "{u+2033}"   ; (″) double prime
 981 cmpAcuteAccent["3"] := "{u+2034}"   ; (‴) triple prime
 982 cmpAcuteAccent["4"] := "{u+2057}"   ; (⁗) quadruple prime
 983 cmpAsterisk["*"] := "{u+00d7}"      ; (×) multiplication sign
 984 cmpStroke["/"] := "{u+00f7}"        ; (÷) division sign
 985 cmpAsterisk["o"] := "{u+00b0}"      ; (°) degree sign
 986 cmpRingAbove["*"] := "{u+00b0}"     ; (°) degree sign
 987 cmpDotAbove["-"] := "{u+00b7}"      ; (·) middle dot
 988 cmpDotAbove["3"] := "{u+2026}"      ; (…) horizontal ellipsis
 989 cmpDotAbove["."] := "{u+2026}"      ; (…) horizontal ellipsis
 990 cmpArrow["-"] := "{u+00aa}"         ; (ª) feminine ordinal indicator (Spanish, Portuguese, Italian, Galician)
 991 cmpRingAbove["-"] := "{u+00ba}"     ; (º) masculine ordinal indicator (Spanish, Portuguese, Italian, Galician)
 992 cmpExclam["!"] := "{u+00a1}"        ; (¡) inverted exclamation mark
 993 cmpQuestion["?"] := "{u+00bf}"      ; (¿) inverted question mark
 994 cmpRingAbove["c"] := "{u+00a9}"     ; (©) copyright sign
 995 cmpParenLeft["c"] := "{u+00a9}"     ; (©) copyright sign
 996 cmpRingAbove["p"] := "{u+2117}"     ; (℗) sound recording copyright
 997 cmpParenLeft["p"] := "{u+2117}"     ; (℗) sound recording copyright
 998 cmpRingAbove["r"] := "{u+00ae}"     ; (®) registered sign
 999 cmpParenLeft["r"] := "{u+00ae}"     ; (®) registered sign
1000 cmpPlus["-"] := "{u+00b1}"          ; (±) plus-minus sign
1001 cmpMacronStroke["+"] := "{u+2213}"  ; (∓) minus-or-plus sign
1002 cmpPercent["%"] := "{u+2030}"       ; (‰) per mille sign
1003 cmpPercent["3"] := "{u+2030}"       ; (‰) per mille sign
1004 cmpPercent["4"] := "{u+2031}"       ; (‱) per ten thousand sign
1005 cmpExclam["="] := "{u+2260}"        ; (≠) not equal to
1006 cmpLessThan[">"] := "{u+2260}"      ; (≠) not equal to
1007 cmpLessThan["="] := "{u+2264}"      ; (≤) less-than or equal to
1008 cmpGreaterThan["="] := "{u+2265}"   ; (≥) greater-than or equal to
1009 cmpLessThan["+"] := "{u+2a7d}"      ; (⩽) less-than or slanted equal to
1010 cmpGreaterThan["+"] := "{u+2a7e}"   ; (⩾) greater-than or slanted equal to
1011 cmpTilde["~"] := "{u+2248}"         ; (≈) almost equal to
1012
1013
1014 ; Compose :  Bullets and Small Geometric Shapes (;)
1015
1016 global cmpSemicolon := Map()
1017 cmpSemicolon["b"] := "{u+2022}"  ; (•) bullet
1018 cmpSemicolon["o"] := "{u+25e6}"  ; (◦) white bullet
1019 cmpSemicolon["h"] := "{u+2043}"  ; (⁃) hyphen bullet
1020 cmpSemicolon["t"] := "{u+2023}"  ; (‣) triangular bullet
1021 cmpSemicolon["q"] := "{u+25aa}"  ; (▪) black small square
1022 cmpSemicolon["u"] := "{u+25ab}"  ; (▫) white small square
1023 cmpSemicolon["w"] := "{u+25b4}"  ; (▴) black up-pointing small triangle
1024 cmpSemicolon["a"] := "{u+25c2}"  ; (◂) black left-pointing small triangle
1025 cmpSemicolon["s"] := "{u+25be}"  ; (▾) black down-pointing small triangle
1026 cmpSemicolon["d"] := "{u+25b8}"  ; (▸) black right-pointing small triangle
1027 cmpSemicolon["i"] := "{u+25b5}"  ; (▵) white up-pointing small triangle
1028 cmpSemicolon["j"] := "{u+25c3}"  ; (◃) white left-pointing small triangle
1029 cmpSemicolon["k"] := "{u+25bf}"  ; (▿) white down-pointing small triangle
1030 cmpSemicolon["l"] := "{u+25b9}"  ; (▹) white right-pointing small triangle
1031 cmpSemicolon["z"] := "{u+25a0}"  ; (■) black square
1032 cmpSemicolon["x"] := "{u+25a1}"  ; (□) white square
1033 cmpSemicolon["c"] := "{u+25c6}"  ; (◆) black diamond
1034 cmpSemicolon["v"] := "{u+25c7}"  ; (◇) white diamond
1035 cmpSemicolon[";"] := "{u+2022}"  ; (•) bullet
1036
1037
1038 ; Compose :  Vulgar Fractions
1039
1040 global cmpDigitOne := Map()
1041 global cmpDigitTwo := Map()
1042 global cmpDigitThree := Map()
1043 global cmpDigitFour := Map()
1044 global cmpDigitFive := Map()
1045 global cmpDigitSeven := Map()
1046 global cmpDigitZero := Map()
1047 cmpDigitOne["2"] := "{u+00bd}"    ; (½) vulgar fraction 1/2
1048 cmpDigitOne["3"] := "{u+2153}"    ; (⅓) vulgar fraction 1/3
1049 cmpDigitTwo["3"] := "{u+2154}"    ; (⅔) vulgar fraction 2/3
1050 cmpDigitOne["4"] := "{u+00bc}"    ; (¼) vulgar fraction 1/4
1051 cmpDigitThree["4"] := "{u+00be}"  ; (¾) vulgar fraction 3/4
1052 cmpDigitOne["5"] := "{u+2155}"    ; (⅕) vulgar fraction 1/5
1053 cmpDigitTwo["5"] := "{u+2156}"    ; (⅖) vulgar fraction 2/5
1054 cmpDigitThree["5"] := "{u+2157}"  ; (⅗) vulgar fraction 3/5
1055 cmpDigitFour["5"] := "{u+2158}"   ; (⅘) vulgar fraction 4/5
1056 cmpDigitOne["6"] := "{u+2159}"    ; (⅙) vulgar fraction 1/6
1057 cmpDigitFive["6"] := "{u+215a}"   ; (⅚) vulgar fraction 5/6
1058 cmpDigitOne["7"] := "{u+2150}"    ; (⅐) vulgar fraction 1/7
1059 cmpDigitOne["8"] := "{u+215b}"    ; (⅛) vulgar fraction 1/8
1060 cmpDigitThree["8"] := "{u+215c}"  ; (⅜) vulgar fraction 3/8
1061 cmpDigitFive["8"] := "{u+215d}"   ; (⅝) vulgar fraction 5/8
1062 cmpDigitSeven["8"] := "{u+215e}"  ; (⅞) vulgar fraction 7/8
1063 cmpDigitOne["9"] := "{u+2151}"    ; (⅑) vulgar fraction 1/9
1064 cmpDigitOne["0"] := "{u+2152}"    ; (⅒) vulgar fraction 1/10
1065 cmpDigitZero["3"] := "{u+2189}"   ; (↉) vulgar fraction 0/3
1066
1067
1068 ; Compose :  Quotation Marks
1069
1070 global cmpBracketLeft := Map()
1071 global cmpBracketRight := Map()
1072 global cmpBackslash := Map()
1073 cmpCedillaOgonek[chr(34)] := "{u+201e}"  ; („) double low-9 quotation mark
1074 cmpDiaeresis[","] := "{u+201e}"          ; („) double low-9 quotation mark
1075 cmpCedillaOgonek["'"] := "{u+201a}"      ; (‚) single low-9 quotation mark
1076 cmpAcuteAccent[","] := "{u+201a}"        ; (‚) single low-9 quotation mark
1077 cmpCedillaOgonek[","] := "{u+201a}"      ; (‚) single low-9 quotation mark
1078 cmpDiaeresis["["] := "{u+201c}"          ; (“) left double quotation mark
1079 cmpBracketLeft[chr(34)] := "{u+201c}"    ; (“) left double quotation mark
1080 cmpDiaeresis["]"] := "{u+201d}"          ; (”) right double quotation mark
1081 cmpBracketRight[chr(34)] := "{u+201d}"   ; (”) right double quotation mark
1082 cmpAcuteAccent["["] := "{u+2018}"        ; (‘) left single quotation mark
1083 cmpBracketLeft["'"] := "{u+2018}"        ; (‘) left single quotation mark
1084 cmpAcuteAccent["]"] := "{u+2019}"        ; (’) right single quotation mark
1085 cmpBracketRight["'"] := "{u+2019}"       ; (’) right single quotation mark
1086 cmpBackslash[chr(34)] := "{u+201f}"      ; (‟) double high-reversed-9 quotation mark
1087 cmpDiaeresis["\"] := "{u+201f}"          ; (‟) double high-reversed-9 quotation mark
1088 cmpBackslash["'"] := "{u+201b}"          ; (‛) single high-reversed-9 quotation mark
1089 cmpAcuteAccent["\"] := "{u+201b}"        ; (‛) single high-reversed-9 quotation mark
1090 cmpLessThan["<"] := "{u+00ab}"           ; («) left-pointing double angle quotation mark
1091 cmpLessThan[chr(34)] := "{u+00ab}"       ; («) left-pointing double angle quotation mark
1092 cmpDiaeresis["<"] := "{u+00ab}"          ; («) left-pointing double angle quotation mark
1093 cmpGreaterThan[">"] := "{u+00bb}"        ; (») right-pointing double angle quotation mark
1094 cmpGreaterThan[chr(34)] := "{u+00bb}"    ; (») right-pointing double angle quotation mark
1095 cmpDiaeresis[">"] := "{u+00bb}"          ; (») right-pointing double angle quotation mark
1096 cmpLessThan["'"] := "{u+2039}"           ; (‹) left-pointing single angle quotation mark
1097 cmpAcuteAccent["<"] := "{u+2039}"        ; (‹) left-pointing single angle quotation mark
1098 cmpGreaterThan["'"] := "{u+203a}"        ; (›) right-pointing single angle quotation mark
1099 cmpAcuteAccent[">"] := "{u+203a}"        ; (›) right-pointing single angle quotation mark
1100
1101
1102 ; Compose :  Double Grave Accent (G)
1103
1104 global cmpCapitalG := Map()
1105 cmpCapitalG["a"] := "{u+0201}"  ; (ȁ) a with double grave
1106 cmpCapitalG["A"] := "{u+0200}"  ; (Ȁ) A with double grave
1107 cmpCapitalG["e"] := "{u+0205}"  ; (ȅ) e with double grave
1108 cmpCapitalG["E"] := "{u+0204}"  ; (Ȅ) E with double grave
1109 cmpCapitalG["i"] := "{u+0209}"  ; (ȉ) i with double grave
1110 cmpCapitalG["I"] := "{u+0208}"  ; (Ȉ) I with double grave
1111 cmpCapitalG["o"] := "{u+020d}"  ; (ȍ) o with double grave
1112 cmpCapitalG["O"] := "{u+020c}"  ; (Ȍ) O with double grave
1113 cmpCapitalG["r"] := "{u+0211}"  ; (ȑ) r with double grave
1114 cmpCapitalG["R"] := "{u+0210}"  ; (Ȑ) R with double grave
1115 cmpCapitalG["u"] := "{u+0215}"  ; (ȕ) u with double grave
1116 cmpCapitalG["U"] := "{u+0214}"  ; (Ȕ) U with double grave
1117
1118
1119 ; Compose :  Inverted Breve (B)
1120
1121 global cmpCapitalB := Map()
1122 cmpCapitalB["a"] := "{u+0203}"  ; (ȃ) a with inverted breve
1123 cmpCapitalB["A"] := "{u+0202}"  ; (Ȃ) A with inverted breve
1124 cmpCapitalB["e"] := "{u+0207}"  ; (ȇ) e with inverted breve
1125 cmpCapitalB["E"] := "{u+0206}"  ; (Ȇ) E with inverted breve
1126 cmpCapitalB["i"] := "{u+020b}"  ; (ȋ) i with inverted breve
1127 cmpCapitalB["I"] := "{u+020a}"  ; (Ȋ) I with inverted breve
1128 cmpCapitalB["o"] := "{u+020f}"  ; (ȏ) o with inverted breve
1129 cmpCapitalB["O"] := "{u+020e}"  ; (Ȏ) O with inverted breve
1130 cmpCapitalB["r"] := "{u+0213}"  ; (ȓ) r with inverted breve
1131 cmpCapitalB["R"] := "{u+0212}"  ; (Ȓ) R with inverted breve
1132 cmpCapitalB["u"] := "{u+0217}"  ; (ȗ) u with inverted breve
1133 cmpCapitalB["U"] := "{u+0216}"  ; (Ȗ) U with inverted breve
1134
1135
1136 ; Compose :  Circumflex Below (I)
1137
1138 cmpCapitalI["d"] := "{u+1e13}"  ; (ḓ) d with circumflex below
1139 cmpCapitalI["D"] := "{u+1e12}"  ; (Ḓ) D with circumflex below
1140 cmpCapitalI["e"] := "{u+1e19}"  ; (ḙ) e with circumflex below
1141 cmpCapitalI["E"] := "{u+1e18}"  ; (Ḙ) E with circumflex below
1142 cmpCapitalI["l"] := "{u+1e3d}"  ; (ḽ) l with circumflex below
1143 cmpCapitalI["L"] := "{u+1e3c}"  ; (Ḽ) L with circumflex below
1144 cmpCapitalI["n"] := "{u+1e4b}"  ; (ṋ) n with circumflex below
1145 cmpCapitalI["N"] := "{u+1e4a}"  ; (Ṋ) N with circumflex below
1146 cmpCapitalI["t"] := "{u+1e71}"  ; (ṱ) t with circumflex below
1147 cmpCapitalI["T"] := "{u+1e70}"  ; (Ṱ) T with circumflex below
1148 cmpCapitalI["u"] := "{u+1e77}"  ; (ṷ) u with circumflex below
1149 cmpCapitalI["U"] := "{u+1e76}"  ; (Ṷ) U with circumflex below
1150
1151
1152 ; Compose :  Tilde Below (T)
1153
1154 cmpCapitalT["e"] := "{u+1e1b}"  ; (ḛ) e with tilde below
1155 cmpCapitalT["E"] := "{u+1e1a}"  ; (Ḛ) E with tilde below
1156 cmpCapitalT["i"] := "{u+1e2d}"  ; (ḭ) i with tilde below
1157 cmpCapitalT["I"] := "{u+1e2c}"  ; (Ḭ) I with tilde below
1158 cmpCapitalT["u"] := "{u+1e75}"  ; (ṵ) u with tilde below
1159 cmpCapitalT["U"] := "{u+1e74}"  ; (Ṵ) U with tilde below
1160
1161
1162 ; Compose :  Line Below (L)
1163
1164 global cmpCapitalL := Map()
1165 cmpCapitalL["b"] := "{u+1e07}"  ; (ḇ) b with line below
1166 cmpCapitalL["B"] := "{u+1e06}"  ; (Ḇ) B with line below
1167 cmpCapitalL["d"] := "{u+1e0f}"  ; (ḏ) d with line below
1168 cmpCapitalL["D"] := "{u+1e0e}"  ; (Ḏ) D with line below
1169 cmpCapitalL["h"] := "{u+1e96}"  ; (ẖ) h with line below
1170 cmpCapitalL["k"] := "{u+1e35}"  ; (ḵ) k with line below
1171 cmpCapitalL["K"] := "{u+1e34}"  ; (Ḵ) K with line below
1172 cmpCapitalL["l"] := "{u+1e3b}"  ; (ḻ) l with line below
1173 cmpCapitalL["L"] := "{u+1e3a}"  ; (Ḻ) L with line below
1174 cmpCapitalL["n"] := "{u+1e49}"  ; (ṉ) n with line below
1175 cmpCapitalL["N"] := "{u+1e48}"  ; (Ṉ) N with line below
1176 cmpCapitalL["r"] := "{u+1e5f}"  ; (ṟ) r with line below
1177 cmpCapitalL["R"] := "{u+1e5e}"  ; (Ṟ) R with line below
1178 cmpCapitalL["t"] := "{u+1e6f}"  ; (ṯ) t with line below
1179 cmpCapitalL["T"] := "{u+1e6e}"  ; (Ṯ) T with line below
1180 cmpCapitalL["z"] := "{u+1e95}"  ; (ẕ) z with line below
1181 cmpCapitalL["Z"] := "{u+1e94}"  ; (Ẕ) Z with line below
1182
1183
1184 ; Compose :  Ring Below, Breve Below and Diaeresis Below (R)
1185
1186 global cmpCapitalR := Map()
1187 cmpCapitalR["a"] := "{u+1e01}"  ; (ḁ) a with ring below
1188 cmpCapitalR["A"] := "{u+1e00}"  ; (Ḁ) A with ring below
1189 cmpCapitalR["h"] := "{u+1e2b}"  ; (ḫ) h with breve below
1190 cmpCapitalR["H"] := "{u+1e2a}"  ; (Ḫ) H with breve below
1191 cmpCapitalR["u"] := "{u+1e73}"  ; (ṳ) u with diaeresis below
1192 cmpCapitalR["U"] := "{u+1e72}"  ; (Ṳ) U with diaeresis below
1193
1194
1195 ; Compose :  Hook Above (<)
1196
1197 cmpLessThan["a"] := "{u+1ea3}"  ; (ả) a with hook above
1198 cmpLessThan["A"] := "{u+1ea2}"  ; (Ả) A with hook above
1199 cmpLessThan["e"] := "{u+1ebb}"  ; (ẻ) e with hook above
1200 cmpLessThan["E"] := "{u+1eba}"  ; (Ẻ) E with hook above
1201 cmpLessThan["i"] := "{u+1ec9}"  ; (ỉ) i with hook above
1202 cmpLessThan["I"] := "{u+1ec8}"  ; (Ỉ) I with hook above
1203 cmpLessThan["o"] := "{u+1ecf}"  ; (ỏ) o with hook above
1204 cmpLessThan["O"] := "{u+1ece}"  ; (Ỏ) O with hook above
1205 cmpLessThan["u"] := "{u+1ee7}"  ; (ủ) u with hook above
1206 cmpLessThan["U"] := "{u+1ee6}"  ; (Ủ) U with hook above
1207 cmpLessThan["y"] := "{u+1ef7}"  ; (ỷ) y with hook above
1208 cmpLessThan["Y"] := "{u+1ef6}"  ; (Ỷ) Y with hook above
1209
1210
1211 ; Compose :  Dot Below (>)
1212
1213 cmpGreaterThan["a"] := "{u+1ea1}"  ; (ạ) a with dot below
1214 cmpGreaterThan["A"] := "{u+1ea0}"  ; (Ạ) A with dot below
1215 cmpGreaterThan["b"] := "{u+1e05}"  ; (ḅ) b with dot below
1216 cmpGreaterThan["B"] := "{u+1e04}"  ; (Ḅ) B with dot below
1217 cmpGreaterThan["d"] := "{u+1e0d}"  ; (ḍ) d with dot below
1218 cmpGreaterThan["D"] := "{u+1e0c}"  ; (Ḍ) D with dot below
1219 cmpGreaterThan["e"] := "{u+1eb9}"  ; (ẹ) e with dot below
1220 cmpGreaterThan["E"] := "{u+1eb8}"  ; (Ẹ) E with dot below
1221 cmpGreaterThan["h"] := "{u+1e25}"  ; (ḥ) h with dot below
1222 cmpGreaterThan["H"] := "{u+1e24}"  ; (Ḥ) H with dot below
1223 cmpGreaterThan["i"] := "{u+1ecb}"  ; (ị) i with dot below
1224 cmpGreaterThan["I"] := "{u+1eca}"  ; (Ị) I with dot below
1225 cmpGreaterThan["k"] := "{u+1e33}"  ; (ḳ) k with dot below
1226 cmpGreaterThan["K"] := "{u+1e32}"  ; (Ḳ) K with dot below
1227 cmpGreaterThan["l"] := "{u+1e37}"  ; (ḷ) l with dot below
1228 cmpGreaterThan["L"] := "{u+1e36}"  ; (Ḷ) L with dot below
1229 cmpGreaterThan["m"] := "{u+1e43}"  ; (ṃ) m with dot below
1230 cmpGreaterThan["M"] := "{u+1e42}"  ; (Ṃ) M with dot below
1231 cmpGreaterThan["n"] := "{u+1e47}"  ; (ṇ) n with dot below
1232 cmpGreaterThan["N"] := "{u+1e46}"  ; (Ṇ) N with dot below
1233 cmpGreaterThan["o"] := "{u+1ecd}"  ; (ọ) o with dot below
1234 cmpGreaterThan["O"] := "{u+1ecc}"  ; (Ọ) O with dot below
1235 cmpGreaterThan["r"] := "{u+1e5b}"  ; (ṛ) r with dot below
1236 cmpGreaterThan["R"] := "{u+1e5a}"  ; (Ṛ) R with dot below
1237 cmpGreaterThan["s"] := "{u+1e63}"  ; (ṣ) s with dot below
1238 cmpGreaterThan["S"] := "{u+1e62}"  ; (Ṣ) S with dot below
1239 cmpGreaterThan["t"] := "{u+1e6d}"  ; (ṭ) t with dot below
1240 cmpGreaterThan["T"] := "{u+1e6c}"  ; (Ṭ) T with dot below
1241 cmpGreaterThan["u"] := "{u+1ee5}"  ; (ụ) u with dot below
1242 cmpGreaterThan["U"] := "{u+1ee4}"  ; (Ụ) U with dot below
1243 cmpGreaterThan["v"] := "{u+1e7f}"  ; (ṿ) v with dot below
1244 cmpGreaterThan["V"] := "{u+1e7e}"  ; (Ṿ) V with dot below
1245 cmpGreaterThan["w"] := "{u+1e89}"  ; (ẉ) w with dot below
1246 cmpGreaterThan["W"] := "{u+1e88}"  ; (Ẉ) W with dot below
1247 cmpGreaterThan["y"] := "{u+1ef5}"  ; (ỵ) y with dot below
1248 cmpGreaterThan["Y"] := "{u+1ef4}"  ; (Ỵ) Y with dot below
1249 cmpGreaterThan["z"] := "{u+1e93}"  ; (ẓ) z with dot below
1250 cmpGreaterThan["Z"] := "{u+1e92}"  ; (Ẓ) Z with dot below
1251
1252
1253 ; Compose :  Miscellaneous Symbols and Dingbats
1254
1255 global cmpDigitSix := Map()
1256
1257 cmpDigitOne["a"] := "{u+2600}"  ; (☀) black sun with rays
1258 cmpDigitOne["b"] := "{u+2601}"  ; (☁) cloud
1259 cmpDigitOne["c"] := "{u+2602}"  ; (☂) umbrella
1260 cmpDigitOne["d"] := "{u+2603}"  ; (☃) snowman
1261 cmpDigitOne["e"] := "{u+2604}"  ; (☄) comet
1262 cmpDigitOne["f"] := "{u+2605}"  ; (★) black star
1263 cmpDigitOne["g"] := "{u+2606}"  ; (☆) white star
1264 cmpDigitOne["h"] := "{u+260e}"  ; (☎) black telephone
1265 cmpDigitOne["i"] := "{u+260f}"  ; (☏) white telephone
1266 cmpDigitOne["j"] := "{u+2610}"  ; (☐) ballot box
1267 cmpDigitOne["k"] := "{u+2611}"  ; (☑) ballot box with check
1268 cmpDigitOne["l"] := "{u+2612}"  ; (☒) ballot box with x
1269 cmpDigitOne["m"] := "{u+2619}"  ; (☙) reversed rotated floral heart bullet
1270 cmpDigitOne["n"] := "{u+261a}"  ; (☚) black left-pointing index
1271 cmpDigitOne["o"] := "{u+261b}"  ; (☛) black right-pointing index
1272 cmpDigitOne["p"] := "{u+261c}"  ; (☜) white left-pointing index
1273 cmpDigitOne["q"] := "{u+261d}"  ; (☝) white up-pointing index
1274 cmpDigitOne["r"] := "{u+261e}"  ; (☞) white right-pointing index
1275 cmpDigitOne["s"] := "{u+261f}"  ; (☟) white down-pointing index
1276 cmpDigitOne["t"] := "{u+2620}"  ; (☠) skull and crossbones
1277 cmpDigitOne["u"] := "{u+2621}"  ; (☡) caution sign
1278 cmpDigitOne["v"] := "{u+2622}"  ; (☢) radioactive sign
1279 cmpDigitOne["w"] := "{u+2623}"  ; (☣) biohazard sign
1280 cmpDigitOne["x"] := "{u+2639}"  ; (☹) white frowning face
1281 cmpDigitOne["y"] := "{u+263a}"  ; (☺) white smiling face
1282 cmpDigitOne["z"] := "{u+263b}"  ; (☻) black smiling face
1283
1284 cmpDigitTwo["a"] := "{u+263c}"  ; (☼) white sun with rays
1285 cmpDigitTwo["b"] := "{u+263d}"  ; (☽) first quarter moon
1286 cmpDigitTwo["c"] := "{u+263e}"  ; (☾) last quarter moon
1287 cmpDigitTwo["d"] := "{u+2640}"  ; (♀) female sign (Venus)
1288 cmpDigitTwo["e"] := "{u+2642}"  ; (♂) male sign (Mars)
1289 cmpDigitTwo["f"] := "{u+2668}"  ; (♨) hot springs
1290 cmpDigitTwo["g"] := "{u+2669}"  ; (♩) quarter note
1291 cmpDigitTwo["h"] := "{u+266a}"  ; (♪) eighth note
1292 cmpDigitTwo["i"] := "{u+266b}"  ; (♫) beamed eighth notes
1293 cmpDigitTwo["j"] := "{u+266c}"  ; (♬) beamed sixteenth notes
1294 cmpDigitTwo["k"] := "{u+266d}"  ; (♭) music flat sign
1295 cmpDigitTwo["l"] := "{u+266e}"  ; (♮) music natural sign
1296 cmpDigitTwo["m"] := "{u+266f}"  ; (♯) music sharp sign
1297 cmpDigitTwo["n"] := "{u+2672}"  ; (♲) universal recycling symbol
1298 cmpDigitTwo["o"] := "{u+267a}"  ; (♺) recycling symbol for generic materials
1299 cmpDigitTwo["p"] := "{u+267b}"  ; (♻) black universal recycling symbol
1300 cmpDigitTwo["q"] := "{u+267f}"  ; (♿) wheelchair symbol
1301 cmpDigitTwo["r"] := "{u+2690}"  ; (⚐) white flag
1302 cmpDigitTwo["s"] := "{u+2691}"  ; (⚑) black flag
1303 cmpDigitTwo["t"] := "{u+26a0}"  ; (⚠) warning sign
1304 cmpDigitTwo["u"] := "{u+26a1}"  ; (⚡) high voltage sign
1305 cmpDigitTwo["v"] := "{u+26d4}"  ; (⛔) no entry
1306 cmpDigitTwo["w"] := "{u+231a}"  ; (⌚) watch
1307 cmpDigitTwo["x"] := "{u+231b}"  ; (⌛) hourglass
1308
1309 cmpDigitThree["a"] := "{u+2701}"  ; (✁) upper blade scissors
1310 cmpDigitThree["b"] := "{u+2702}"  ; (✂) black scissors
1311 cmpDigitThree["c"] := "{u+2703}"  ; (✃) lower blade scissors
1312 cmpDigitThree["d"] := "{u+2704}"  ; (✄) white scissors
1313 cmpDigitThree["e"] := "{u+2706}"  ; (✆) telephone location sign
1314 cmpDigitThree["f"] := "{u+2707}"  ; (✇) tape drive
1315 cmpDigitThree["g"] := "{u+2708}"  ; (✈) airplane
1316 cmpDigitThree["h"] := "{u+2709}"  ; (✉) envelope
1317 cmpDigitThree["i"] := "{u+270a}"  ; (✊) raised fist
1318 cmpDigitThree["j"] := "{u+270b}"  ; (✋) raised hand
1319 cmpDigitThree["k"] := "{u+270c}"  ; (✌) victory hand
1320 cmpDigitThree["l"] := "{u+270d}"  ; (✍) writing hand
1321 cmpDigitThree["m"] := "{u+270e}"  ; (✎) lower right pencil
1322 cmpDigitThree["n"] := "{u+270f}"  ; (✏) pencil
1323 cmpDigitThree["o"] := "{u+2710}"  ; (✐) upper right pencil
1324 cmpDigitThree["p"] := "{u+2711}"  ; (✑) white nib
1325 cmpDigitThree["q"] := "{u+2712}"  ; (✒) black nib
1326 cmpDigitThree["r"] := "{u+2713}"  ; (✓) check mark
1327 cmpDigitThree["s"] := "{u+2714}"  ; (✔) heavy check mark
1328 cmpDigitThree["t"] := "{u+2715}"  ; (✕) multiplication x
1329 cmpDigitThree["u"] := "{u+2716}"  ; (✖) heavy multiplication x
1330 cmpDigitThree["v"] := "{u+2717}"  ; (✗) ballot x
1331 cmpDigitThree["w"] := "{u+2718}"  ; (✘) heavy ballot x
1332 cmpDigitThree["x"] := "{u+2719}"  ; (✙) outlined Greek cross
1333 cmpDigitThree["y"] := "{u+271a}"  ; (✚) heavy Greek cross
1334 cmpDigitThree["z"] := "{u+271b}"  ; (✛) open centre cross
1335
1336 cmpDigitFour["a"] := "{u+271c}"  ; (✜) heavy open centre cross
1337 cmpDigitFour["b"] := "{u+271d}"  ; (✝) Latin cross
1338 cmpDigitFour["c"] := "{u+271e}"  ; (✞) shadowed white Latin cross
1339 cmpDigitFour["d"] := "{u+271f}"  ; (✟) outlined Latin cross
1340 cmpDigitFour["e"] := "{u+2720}"  ; (✠) Maltese cross
1341 cmpDigitFour["f"] := "{u+2721}"  ; (✡) star of David
1342 cmpDigitFour["g"] := "{u+2722}"  ; (✢) four teardrop-spoked asterisk
1343 cmpDigitFour["h"] := "{u+2723}"  ; (✣) four balloon-spoked asterisk
1344 cmpDigitFour["i"] := "{u+2724}"  ; (✤) heavy four balloon-spoked asterisk
1345 cmpDigitFour["j"] := "{u+2725}"  ; (✥) four club-spoked asterisk
1346 cmpDigitFour["k"] := "{u+2726}"  ; (✦) black four-pointed star
1347 cmpDigitFour["l"] := "{u+2727}"  ; (✧) white four-pointed star
1348 cmpDigitFour["m"] := "{u+2729}"  ; (✩) stress outlined white star
1349 cmpDigitFour["n"] := "{u+272a}"  ; (✪) circled white star
1350 cmpDigitFour["o"] := "{u+272b}"  ; (✫) open centre black star
1351 cmpDigitFour["p"] := "{u+272c}"  ; (✬) black centre white star
1352 cmpDigitFour["q"] := "{u+272d}"  ; (✭) outlined black star
1353 cmpDigitFour["r"] := "{u+272e}"  ; (✮) heavy outlined black star
1354 cmpDigitFour["s"] := "{u+272f}"  ; (✯) pinwheel star
1355 cmpDigitFour["t"] := "{u+2730}"  ; (✰) shadowed white star
1356 cmpDigitFour["u"] := "{u+2731}"  ; (✱) heavy asterisk
1357 cmpDigitFour["v"] := "{u+2732}"  ; (✲) open centre asterisk
1358 cmpDigitFour["w"] := "{u+2733}"  ; (✳) eight-spoked asterisk
1359 cmpDigitFour["x"] := "{u+2734}"  ; (✴) eight-pointed black star
1360 cmpDigitFour["y"] := "{u+2735}"  ; (✵) eight-pointed pinwheel star
1361 cmpDigitFour["z"] := "{u+2736}"  ; (✶) six-pointed black star
1362
1363 cmpDigitFive["a"] := "{u+2737}"  ; (✷) eight-pointed rectilinear black star
1364 cmpDigitFive["b"] := "{u+2738}"  ; (✸) heavy eight-pointed rectilinear black star
1365 cmpDigitFive["c"] := "{u+2739}"  ; (✹) twelve pointed black star
1366 cmpDigitFive["d"] := "{u+273a}"  ; (✺) sixteen-pointed asterisk
1367 cmpDigitFive["e"] := "{u+273b}"  ; (✻) teardrop-spoked asterisk
1368 cmpDigitFive["f"] := "{u+273c}"  ; (✼) open centre teardrop-spoked asterisk
1369 cmpDigitFive["g"] := "{u+273d}"  ; (✽) heavy teardrop-spoked asterisk
1370 cmpDigitFive["h"] := "{u+273e}"  ; (✾) six-petalled black and white florette
1371 cmpDigitFive["i"] := "{u+273f}"  ; (✿) black florette
1372 cmpDigitFive["j"] := "{u+2740}"  ; (❀) white florette
1373 cmpDigitFive["k"] := "{u+2741}"  ; (❁) eight-petalled outlined black florette
1374 cmpDigitFive["l"] := "{u+2742}"  ; (❂) circled open centre eight-pointed star
1375 cmpDigitFive["m"] := "{u+2743}"  ; (❃) heavy teardrop-spoked pinwheel asterisk
1376 cmpDigitFive["n"] := "{u+2744}"  ; (❄) snowflake
1377 cmpDigitFive["o"] := "{u+2745}"  ; (❅) tight trifoliate snowflake
1378 cmpDigitFive["p"] := "{u+2746}"  ; (❆) heavy chevron snowflake
1379 cmpDigitFive["q"] := "{u+2747}"  ; (❇) sparkle
1380 cmpDigitFive["r"] := "{u+2748}"  ; (❈) heavy sparkle
1381 cmpDigitFive["s"] := "{u+2749}"  ; (❉) balloon-spoked asterisk
1382 cmpDigitFive["t"] := "{u+274a}"  ; (❊) eight teardrop-spoked propeller asterisk
1383 cmpDigitFive["u"] := "{u+274b}"  ; (❋) heavy eight teardrop-spoked propeller asterisk
1384 cmpDigitFive["v"] := "{u+274d}"  ; (❍) shadowed white circle
1385 cmpDigitFive["w"] := "{u+274f}"  ; (❏) lower right drop-shadowed white square
1386 cmpDigitFive["x"] := "{u+2750}"  ; (❐) upper right drop-shadowed white square
1387 cmpDigitFive["y"] := "{u+2751}"  ; (❑) lower right shadowed white square
1388 cmpDigitFive["z"] := "{u+2752}"  ; (❒) upper right shadowed white square
1389
1390 cmpDigitSix["a"] := "{u+2756}"  ; (❖) black diamond minus white x
1391 cmpDigitSix["b"] := "{u+2758}"  ; (❘) light vertical bar
1392 cmpDigitSix["c"] := "{u+2759}"  ; (❙) medium vertical bar
1393 cmpDigitSix["d"] := "{u+275a}"  ; (❚) heavy vertical bar
1394 cmpDigitSix["e"] := "{u+275b}"  ; (❛) heavy single turned comma quotation mark ornament
1395 cmpDigitSix["f"] := "{u+275c}"  ; (❜) heavy single comma quotation mark ornament
1396 cmpDigitSix["g"] := "{u+275d}"  ; (❝) heavy double turned comma quotation mark ornament
1397 cmpDigitSix["h"] := "{u+275e}"  ; (❞) heavy double comma quotation mark ornament
1398 cmpDigitSix["i"] := "{u+275f}"  ; (❟) heavy low single comma quotation mark ornament
1399 cmpDigitSix["j"] := "{u+2760}"  ; (❠) heavy low double comma quotation mark ornament
1400 cmpDigitSix["k"] := "{u+2761}"  ; (❡) curved stem paragraph sign ornament
1401 cmpDigitSix["l"] := "{u+2762}"  ; (❢) heavy exclamation mark ornament
1402 cmpDigitSix["m"] := "{u+2763}"  ; (❣) heavy heart exclamation mark ornament
1403 cmpDigitSix["n"] := "{u+2764}"  ; (❤) heavy black heart
1404 cmpDigitSix["o"] := "{u+2765}"  ; (❥) rotated heavy black heart bullet
1405 cmpDigitSix["p"] := "{u+2766}"  ; (❦) floral heart
1406 cmpDigitSix["q"] := "{u+2767}"  ; (❧) rotated floral heart bullet
1407
1408 cmpDigitSeven["a"] := "{u+2794}"  ; (➔) heavy wide-headed rightwards arrow
1409 cmpDigitSeven["b"] := "{u+2798}"  ; (➘) heavy south east arrow
1410 cmpDigitSeven["c"] := "{u+2799}"  ; (➙) heavy rightwards arrow
1411 cmpDigitSeven["d"] := "{u+279a}"  ; (➚) heavy north east arrow
1412 cmpDigitSeven["e"] := "{u+279b}"  ; (➛) drafting point rightwards arrow
1413 cmpDigitSeven["f"] := "{u+279c}"  ; (➜) heavy round-tipped rightwards arrow
1414 cmpDigitSeven["g"] := "{u+279d}"  ; (➝) triangle-headed rightwards arrow
1415 cmpDigitSeven["h"] := "{u+279e}"  ; (➞) heavy triangle-headed rightwards arrow
1416 cmpDigitSeven["i"] := "{u+279f}"  ; (➟) dashed triangle-headed rightwards arrow
1417 cmpDigitSeven["j"] := "{u+27a0}"  ; (➠) heavy dashed triangle-headed rightwards arrow
1418 cmpDigitSeven["k"] := "{u+27a1}"  ; (➡) black rightwards arrow
1419 cmpDigitSeven["l"] := "{u+27a2}"  ; (➢) 3d top-lighted rightwards arrowhead
1420 cmpDigitSeven["m"] := "{u+27a3}"  ; (➣) 3d bottom-lighted rightwards arrowhead
1421 cmpDigitSeven["n"] := "{u+27a4}"  ; (➤) black rightwards arrowhead
1422 cmpDigitSeven["o"] := "{u+27a5}"  ; (➥) heavy black curved downwards and rightwards arrow
1423 cmpDigitSeven["p"] := "{u+27a6}"  ; (➦) heavy black curved upwards and rightwards arrow
1424 cmpDigitSeven["q"] := "{u+27a7}"  ; (➧) squat black rightwards arrow
1425 cmpDigitSeven["r"] := "{u+27a8}"  ; (➨) heavy concave-pointed black rightwards arrow
1426 cmpDigitSeven["s"] := "{u+27a9}"  ; (➩) right-shaded white rightwards arrow
1427 cmpDigitSeven["t"] := "{u+27aa}"  ; (➪) left-shaded white rightwards arrow
1428 cmpDigitSeven["u"] := "{u+27ab}"  ; (➫) back-tilted shadowed white rightwards arrow
1429 cmpDigitSeven["v"] := "{u+27ac}"  ; (➬) front-tilted shadowed white rightwards arrow
1430 cmpDigitSeven["w"] := "{u+27ad}"  ; (➭) heavy lower right-shadowed white rightwards arrow
1431 cmpDigitSeven["x"] := "{u+27ae}"  ; (➮) heavy upper right-shadowed white rightwards arrow
1432 cmpDigitSeven["y"] := "{u+27af}"  ; (➯) notched lower right-shadowed white rightwards arrow
1433 cmpDigitSeven["z"] := "{u+27b1}"  ; (➱) notched upper right-shadowed white rightwards arrow
1434
1435 cmpDigitEight["a"] := "{u+27b2}"  ; (➲) circled heavy white rightwards arrow
1436 cmpDigitEight["b"] := "{u+27b3}"  ; (➳) white-feathered rightwards arrow
1437 cmpDigitEight["c"] := "{u+27b4}"  ; (➴) black-feathered south east arrow
1438 cmpDigitEight["d"] := "{u+27b5}"  ; (➵) black-feathered rightwards arrow
1439 cmpDigitEight["e"] := "{u+27b6}"  ; (➶) black-feathered north east arrow
1440 cmpDigitEight["f"] := "{u+27b7}"  ; (➷) heavy black-feathered south east arrow
1441 cmpDigitEight["g"] := "{u+27b8}"  ; (➸) heavy black-feathered rightwards arrow
1442 cmpDigitEight["h"] := "{u+27b9}"  ; (➹) heavy black-feathered north east arrow
1443 cmpDigitEight["i"] := "{u+27ba}"  ; (➺) teardrop-barbed rightwards arrow
1444 cmpDigitEight["j"] := "{u+27bb}"  ; (➻) heavy teardrop-shanked rightwards arrow
1445 cmpDigitEight["k"] := "{u+27bc}"  ; (➼) wedge-tailed rightwards arrow
1446 cmpDigitEight["l"] := "{u+27bd}"  ; (➽) heavy wedge-tailed rightwards arrow
1447 cmpDigitEight["m"] := "{u+27be}"  ; (➾) open-outlined rightwards arrow
1448 cmpDigitEight["n"] := "{u+27c1}"  ; (⟁) white triangle containing small white triangle
1449
1450
1451 ; Compose :  Chess Pieces and Playing Card Suit Symbols (C)
1452
1453 global cmpCapitalC := Map()
1454 cmpCapitalC["k"] := "{u+2654}"  ; (♔) white chess king
1455 cmpCapitalC["q"] := "{u+2655}"  ; (♕) white chess queen
1456 cmpCapitalC["r"] := "{u+2656}"  ; (♖) white chess rook
1457 cmpCapitalC["b"] := "{u+2657}"  ; (♗) white chess bishop
1458 cmpCapitalC["n"] := "{u+2658}"  ; (♘) white chess knight
1459 cmpCapitalC["p"] := "{u+2659}"  ; (♙) white chess pawn
1460 cmpCapitalC["K"] := "{u+265a}"  ; (♚) black chess king
1461 cmpCapitalC["Q"] := "{u+265b}"  ; (♛) black chess queen
1462 cmpCapitalC["R"] := "{u+265c}"  ; (♜) black chess rook
1463 cmpCapitalC["B"] := "{u+265d}"  ; (♝) black chess bishop
1464 cmpCapitalC["N"] := "{u+265e}"  ; (♞) black chess knight
1465 cmpCapitalC["P"] := "{u+265f}"  ; (♟) black chess pawn
1466 cmpCapitalC["c"] := "{u+2667}"  ; (♧) white club suit
1467 cmpCapitalC["C"] := "{u+2663}"  ; (♣) black club suit
1468 cmpCapitalC["d"] := "{u+2662}"  ; (♢) white diamond suit
1469 cmpCapitalC["D"] := "{u+2666}"  ; (♦) black diamond suit
1470 cmpCapitalC["h"] := "{u+2661}"  ; (♡) white heart suit
1471 cmpCapitalC["H"] := "{u+2665}"  ; (♥) black heart suit
1472 cmpCapitalC["s"] := "{u+2664}"  ; (♤) white spade suit
1473 cmpCapitalC["S"] := "{u+2660}"  ; (♠) black spade suit
1474
1475
1476 ; Compose :  Dingbat Negative Circled Digits (n)
1477
1478 cmpSmallN["1"] := "{u+2776}"  ; (❶) dingbat negative circled digit 1
1479 cmpSmallN["2"] := "{u+2777}"  ; (❷) dingbat negative circled digit 2
1480 cmpSmallN["3"] := "{u+2778}"  ; (❸) dingbat negative circled digit 3
1481 cmpSmallN["4"] := "{u+2779}"  ; (❹) dingbat negative circled digit 4
1482 cmpSmallN["5"] := "{u+277a}"  ; (❺) dingbat negative circled digit 5
1483 cmpSmallN["6"] := "{u+277b}"  ; (❻) dingbat negative circled digit 6
1484 cmpSmallN["7"] := "{u+277c}"  ; (❼) dingbat negative circled digit 7
1485 cmpSmallN["8"] := "{u+277d}"  ; (❽) dingbat negative circled digit 8
1486 cmpSmallN["9"] := "{u+277e}"  ; (❾) dingbat negative circled digit 9
1487 cmpSmallN["0"] := "{u+277f}"  ; (❿) dingbat negative circled digit 10
1488
1489
1490 ; Configuration :  'Right Alt' and 'Right Alt + Shift' on US QWERTY
1491
1492 >!a:: {
1493   if GetKeyState("CapsLock", "T")
1494     Send "{u+00c4}"  ; (Ä) A with diaeresis
1495   else
1496     Send "{u+00e4}"  ; (ä) a with diaeresis
1497 }
1498 >!+a:: {
1499   if GetKeyState("CapsLock", "T")
1500     Send "{u+00e4}"  ; (ä) a with diaeresis
1501   else
1502     Send "{u+00c4}"  ; (Ä) A with diaeresis
1503 }
1504
1505 >!q:: {
1506   if GetKeyState("CapsLock", "T")
1507     Send "{u+00c6}"  ; (Æ) letter AE
1508   else
1509     Send "{u+00e6}"  ; (æ) letter ae
1510 }
1511 >!+q:: {
1512   if GetKeyState("CapsLock", "T")
1513     Send "{u+00e6}"  ; (æ) letter ae
1514   else
1515     Send "{u+00c6}"  ; (Æ) letter AE
1516 }
1517
1518 >!w:: {
1519   if GetKeyState("CapsLock", "T")
1520     Send "{u+00c5}"  ; (Å) A with ring above
1521   else
1522     Send "{u+00e5}"  ; (å) a with ring above
1523 }
1524 >!+w:: {
1525   if GetKeyState("CapsLock", "T")
1526     Send "{u+00e5}"  ; (å) a with ring above
1527   else
1528     Send "{u+00c5}"  ; (Å) A with ring above
1529 }
1530
1531 >!z:: {
1532   if GetKeyState("CapsLock", "T")
1533     Send "{u+00c1}"  ; (Á) A with acute
1534   else
1535     Send "{u+00e1}"  ; (á) a with acute
1536 }
1537 >!+z:: {
1538   if GetKeyState("CapsLock", "T")
1539     Send "{u+00e1}"  ; (á) a with acute
1540   else
1541     Send "{u+00c1}"  ; (Á) A with acute
1542 }
1543
1544 >!x:: {
1545   if GetKeyState("CapsLock", "T")
1546     Send "{u+00c0}"  ; (À) A with grave
1547   else
1548     Send "{u+00e0}"  ; (à) a with grave
1549 }
1550 >!+x:: {
1551   if GetKeyState("CapsLock", "T")
1552     Send "{u+00e0}"  ; (à) a with grave
1553   else
1554     Send "{u+00c0}"  ; (À) A with grave
1555 }
1556
1557 >!d:: {
1558   if GetKeyState("CapsLock", "T")
1559     Send "{u+00c2}"  ; (Â) A with circumflex
1560   else
1561     Send "{u+00e2}"  ; (â) a with circumflex
1562 }
1563 >!+d:: {
1564   if GetKeyState("CapsLock", "T")
1565     Send "{u+00e2}"  ; (â) a with circumflex
1566   else
1567     Send "{u+00c2}"  ; (Â) A with circumflex
1568 }
1569
1570 >!c:: {
1571   if GetKeyState("CapsLock", "T")
1572     Send "{u+00c7}"  ; (Ç) C with cedilla
1573   else
1574     Send "{u+00e7}"  ; (ç) c with cedilla
1575 }
1576 >!+c:: {
1577   if GetKeyState("CapsLock", "T")
1578     Send "{u+00e7}"  ; (ç) c with cedilla
1579   else
1580     Send "{u+00c7}"  ; (Ç) C with cedilla
1581 }
1582
1583 >!e:: {
1584   if GetKeyState("CapsLock", "T")
1585     Send "{u+00cb}"  ; (Ë) E with diaeresis
1586   else
1587     Send "{u+00eb}"  ; (ë) e with diaeresis
1588 }
1589 >!+e:: {
1590   if GetKeyState("CapsLock", "T")
1591     Send "{u+00eb}"  ; (ë) e with diaeresis
1592   else
1593     Send "{u+00cb}"  ; (Ë) E with diaeresis
1594 }
1595
1596 >!f:: {
1597   if GetKeyState("CapsLock", "T")
1598     Send "{u+00c9}"  ; (É) E with acute
1599   else
1600     Send "{u+00e9}"  ; (é) e with acute
1601 }
1602 >!+f:: {
1603   if GetKeyState("CapsLock", "T")
1604     Send "{u+00e9}"  ; (é) e with acute
1605   else
1606     Send "{u+00c9}"  ; (É) E with acute
1607 }
1608
1609 >!g:: {
1610   if GetKeyState("CapsLock", "T")
1611     Send "{u+00c8}"  ; (È) E with grave
1612   else
1613     Send "{u+00e8}"  ; (è) e with grave
1614 }
1615 >!+g:: {
1616   if GetKeyState("CapsLock", "T")
1617     Send "{u+00e8}"  ; (è) e with grave
1618   else
1619     Send "{u+00c8}"  ; (È) E with grave
1620 }
1621
1622 >!r:: {
1623   if GetKeyState("CapsLock", "T")
1624     Send "{u+00ca}"  ; (Ê) E with circumflex
1625   else
1626     Send "{u+00ea}"  ; (ê) e with circumflex
1627 }
1628 >!+r:: {
1629   if GetKeyState("CapsLock", "T")
1630     Send "{u+00ea}"  ; (ê) e with circumflex
1631   else
1632     Send "{u+00ca}"  ; (Ê) E with circumflex
1633 }
1634
1635 >!i:: {
1636   if GetKeyState("CapsLock", "T")
1637     Send "{u+00cf}"  ; (Ï) I with diaeresis
1638   else
1639     Send "{u+00ef}"  ; (ï) i with diaeresis
1640 }
1641 >!+i:: {
1642   if GetKeyState("CapsLock", "T")
1643     Send "{u+00ef}"  ; (ï) i with diaeresis
1644   else
1645     Send "{u+00cf}"  ; (Ï) I with diaeresis
1646 }
1647
1648 >!v:: {
1649   if GetKeyState("CapsLock", "T")
1650     Send "{u+00cd}"  ; (Í) I with acute
1651   else
1652     Send "{u+00ed}"  ; (í) i with acute
1653 }
1654 >!+v:: {
1655   if GetKeyState("CapsLock", "T")
1656     Send "{u+00ed}"  ; (í) i with acute
1657   else
1658     Send "{u+00cd}"  ; (Í) I with acute
1659 }
1660
1661 >!b:: {
1662   if GetKeyState("CapsLock", "T")
1663     Send "{u+00cc}"  ; (Ì) I with grave
1664   else
1665     Send "{u+00ec}"  ; (ì) i with grave
1666 }
1667 >!+b:: {
1668   if GetKeyState("CapsLock", "T")
1669     Send "{u+00ec}"  ; (ì) i with grave
1670   else
1671     Send "{u+00cc}"  ; (Ì) I with grave
1672 }
1673
1674 >!t:: {
1675   if GetKeyState("CapsLock", "T")
1676     Send "{u+00ce}"  ; (Î) I with circumflex
1677   else
1678     Send "{u+00ee}"  ; (î) i with circumflex
1679 }
1680 >!+t:: {
1681   if GetKeyState("CapsLock", "T")
1682     Send "{u+00ee}"  ; (î) i with circumflex
1683   else
1684     Send "{u+00ce}"  ; (Î) I with circumflex
1685 }
1686
1687 >!n:: {
1688   if GetKeyState("CapsLock", "T")
1689     Send "{u+00d1}"  ; (Ñ) N with tilde
1690   else
1691     Send "{u+00f1}"  ; (ñ) n with tilde
1692 }
1693 >!+n:: {
1694   if GetKeyState("CapsLock", "T")
1695     Send "{u+00f1}"  ; (ñ) n with tilde
1696   else
1697     Send "{u+00d1}"  ; (Ñ) N with tilde
1698 }
1699
1700 >!o:: {
1701   if GetKeyState("CapsLock", "T")
1702     Send "{u+00d6}"  ; (Ö) O with diaeresis
1703   else
1704     Send "{u+00f6}"  ; (ö) o with diaeresis
1705 }
1706 >!+o:: {
1707   if GetKeyState("CapsLock", "T")
1708     Send "{u+00f6}"  ; (ö) o with diaeresis
1709   else
1710     Send "{u+00d6}"  ; (Ö) O with diaeresis
1711 }
1712
1713 >!k:: {
1714   if GetKeyState("CapsLock", "T")
1715     Send "{u+0152}"  ; (Œ) ligature OE
1716   else
1717     Send "{u+0153}"  ; (œ) ligature oe
1718 }
1719 >!+k:: {
1720   if GetKeyState("CapsLock", "T")
1721     Send "{u+0153}"  ; (œ) ligature oe
1722   else
1723     Send "{u+0152}"  ; (Œ) ligature OE
1724 }
1725
1726 >!l:: {
1727   if GetKeyState("CapsLock", "T")
1728     Send "{u+00d8}"  ; (Ø) O with stroke
1729   else
1730     Send "{u+00f8}"  ; (ø) o with stroke
1731 }
1732 >!+l:: {
1733   if GetKeyState("CapsLock", "T")
1734     Send "{u+00f8}"  ; (ø) o with stroke
1735   else
1736     Send "{u+00d8}"  ; (Ø) O with stroke
1737 }
1738
1739 >!,:: {
1740   if GetKeyState("CapsLock", "T")
1741     Send "{u+00d3}"  ; (Ó) O with acute
1742   else
1743     Send "{u+00f3}"  ; (ó) o with acute
1744 }
1745 >!<:: {
1746   if GetKeyState("CapsLock", "T")
1747     Send "{u+00f3}"  ; (ó) o with acute
1748   else
1749     Send "{u+00d3}"  ; (Ó) O with acute
1750 }
1751
1752 >!.:: {
1753   if GetKeyState("CapsLock", "T")
1754     Send "{u+00d2}"  ; (Ò) O with grave
1755   else
1756     Send "{u+00f2}"  ; (ò) o with grave
1757 }
1758 >!>:: {
1759   if GetKeyState("CapsLock", "T")
1760     Send "{u+00f2}"  ; (ò) o with grave
1761   else
1762     Send "{u+00d2}"  ; (Ò) O with grave
1763 }
1764
1765 >!p:: {
1766   if GetKeyState("CapsLock", "T")
1767     Send "{u+00d4}"  ; (Ô) O with circumflex
1768   else
1769     Send "{u+00f4}"  ; (ô) o with circumflex
1770 }
1771 >!+p:: {
1772   if GetKeyState("CapsLock", "T")
1773     Send "{u+00f4}"  ; (ô) o with circumflex
1774   else
1775     Send "{u+00d4}"  ; (Ô) O with circumflex
1776 }
1777
1778 >!s:: {
1779   if GetKeyState("CapsLock", "T")
1780     Send "{u+1e9e}"  ; (ẞ) capital sharp S (capital Eszett)
1781   else
1782     Send "{u+00df}"  ; (ß) small sharp s (Eszett)
1783 }
1784 >!+s:: {
1785   if GetKeyState("CapsLock", "T")
1786     Send "{u+00df}"  ; (ß) small sharp s (Eszett)
1787   else
1788     Send "{u+1e9e}"  ; (ẞ) capital sharp S (capital Eszett)
1789 }
1790
1791 >!u:: {
1792   if GetKeyState("CapsLock", "T")
1793     Send "{u+00dc}"  ; (Ü) U with diaeresis
1794   else
1795     Send "{u+00fc}"  ; (ü) u with diaeresis
1796 }
1797 >!+u:: {
1798   if GetKeyState("CapsLock", "T")
1799     Send "{u+00fc}"  ; (ü) u with diaeresis
1800   else
1801     Send "{u+00dc}"  ; (Ü) U with diaeresis
1802 }
1803
1804 >!h:: {
1805   if GetKeyState("CapsLock", "T")
1806     Send "{u+00da}"  ; (Ú) U with acute
1807   else
1808     Send "{u+00fa}"  ; (ú) u with acute
1809 }
1810 >!+h:: {
1811   if GetKeyState("CapsLock", "T")
1812     Send "{u+00fa}"  ; (ú) u with acute
1813   else
1814     Send "{u+00da}"  ; (Ú) U with acute
1815 }
1816
1817 >!j:: {
1818   if GetKeyState("CapsLock", "T")
1819     Send "{u+00d9}"  ; (Ù) U with grave
1820   else
1821     Send "{u+00f9}"  ; (ù) u with grave
1822 }
1823 >!+j:: {
1824   if GetKeyState("CapsLock", "T")
1825     Send "{u+00f9}"  ; (ù) u with grave
1826   else
1827     Send "{u+00d9}"  ; (Ù) U with grave
1828 }
1829
1830 >!y:: {
1831   if GetKeyState("CapsLock", "T")
1832     Send "{u+00db}"  ; (Û) U with circumflex
1833   else
1834     Send "{u+00fb}"  ; (û) u with circumflex
1835 }
1836 >!+y:: {
1837   if GetKeyState("CapsLock", "T")
1838     Send "{u+00fb}"  ; (û) u with circumflex
1839   else
1840     Send "{u+00db}"  ; (Û) U with circumflex
1841 }
1842
1843 >!6:: {
1844   if GetKeyState("CapsLock", "T")
1845     Send "{u+00c3}"  ; (Ã) A with tilde
1846   else
1847     Send "{u+00e3}"  ; (ã) a with tilde
1848 }
1849 >!+6:: {
1850   if GetKeyState("CapsLock", "T")
1851     Send "{u+00e3}"  ; (ã) a with tilde
1852   else
1853     Send "{u+00c3}"  ; (Ã) A with tilde
1854 }
1855
1856 >!7:: {
1857   if GetKeyState("CapsLock", "T")
1858     Send "{u+00d5}"  ; (Õ) O with tilde
1859   else
1860     Send "{u+00f5}"  ; (õ) o with tilde
1861 }
1862 >!+7:: {
1863   if GetKeyState("CapsLock", "T")
1864     Send "{u+00f5}"  ; (õ) o with tilde
1865   else
1866     Send "{u+00d5}"  ; (Õ) O with tilde
1867 }
1868
1869 >!m::Send "{u+00b5}"   ; (µ) micro sign
1870 >!+m::Send "{u+00b1}"  ; (±) plus-minus sign
1871
1872 >!1::Send "{u+00a1}"   ; (¡) inverted exclamation mark
1873 >!+1::Send "{u+00b9}"  ; (¹) superscript 1
1874
1875 >!2::Send "{u+2264}"   ; (≤) less-than or equal to
1876 >!+2::Send "{u+00b2}"  ; (²) superscript 2
1877
1878 >!3::Send "{u+2265}"   ; (≥) greater-than or equal to
1879 >!+3::Send "{u+00b3}"  ; (³) superscript 3
1880
1881 >!4::Send "{u+00a3}"   ; (£) pound sign
1882 >!+4::Send "{u+00a5}"  ; (¥) yen sign
1883
1884 >!5::Send "{u+20ac}"   ; (€) euro sign
1885 >!+5::Send "{u+00a2}"  ; (¢) cent sign (dollar)
1886
1887 >!8::Send "{u+201e}"   ; („) double low-9 quotation mark
1888 >!+8::Send "{u+00a7}"  ; (§) section sign
1889
1890 >!9::Send "{u+201c}"   ; (“) left double quotation mark
1891 >!+9::Send "{u+2018}"  ; (‘) left single quotation mark
1892
1893 >!0::Send "{u+201d}"   ; (”) right double quotation mark
1894 >!+0::Send "{u+2019}"  ; (’) right single quotation mark
1895
1896 >!-::Send "{u+2013}"   ; (–) en dash
1897 >!_::Send "{u+2014}"   ; (—) em dash
1898
1899 >!=::Send "{u+00d7}"   ; (×) multiplication sign
1900 >!+::Send "{u+00f7}"   ; (÷) division sign
1901
1902 >![::Send "{u+00ab}"   ; («) left-pointing double angle quotation mark
1903 >!{::Send "{u+2039}"   ; (‹) left-pointing single angle quotation mark
1904
1905 >!]::Send "{u+00bb}"   ; (») right-pointing double angle quotation mark
1906 >!}::Send "{u+203a}"   ; (›) right-pointing single angle quotation mark
1907
1908 >!;::Send "{u+00b0}"   ; (°) degree sign
1909 >!+;::Send "{u+00b7}"  ; (·) middle dot
1910
1911 >!'::Send "{u+266a}"   ; (♪) eighth note
1912 >!"::Send "{u+266b}"   ; (♫) beamed eighth notes
1913
1914 >!\::Send "{u+2002}"   ;     en space
1915 >!|::Send "{u+2003}"   ;     em space
1916
1917 >!/::Send "{u+00bf}"   ; (¿) inverted question mark
1918 >!?::Send "{u+2022}"   ; (•) bullet
1919
1920 >!space::Send "{u+00a0}"   ; non-breaking space (NBSP)
1921 >!+space::Send "{u+00a0}"  ; non-breaking space (NBSP)
1922
1923
1924 ; Configuration :  Compose Key Selector
1925
1926 >!`::
1927 >!~::
1928 >!sc056::
1929 >!+sc056:: {
1930   ihA := InputHook("L1", gEndKeys)
1931   ihA.Start()
1932   ihA.Wait()
1933
1934   ihB := InputHook("L1", gEndKeys)
1935   ihB.Start()
1936   ihB.Wait()
1937
1938   if (ihA.Input == "'") {
1939     if cmpAcuteAccent.Has(ihB.Input)
1940       Send cmpAcuteAccent[ihB.Input]
1941   }
1942   else if (ihA.Input == "``") {
1943     if cmpGraveAccent.Has(ihB.Input)
1944       Send cmpGraveAccent[ihB.Input]
1945   }
1946   else if (ihA.Input == chr(34)) {
1947     if cmpDiaeresis.Has(ihB.Input)
1948       Send cmpDiaeresis[ihB.Input]
1949   }
1950   else if (ihA.Input == "c") {
1951     if cmpCircumflex.Has(ihB.Input)
1952       Send cmpCircumflex[ihB.Input]
1953   }
1954   else if (ihA.Input == "~") {
1955     if cmpTilde.Has(ihB.Input)
1956       Send cmpTilde[ihB.Input]
1957   }
1958   else if (ihA.Input == ",") {
1959     if cmpCedillaOgonek.Has(ihB.Input)
1960       Send cmpCedillaOgonek[ihB.Input]
1961   }
1962   else if (ihA.Input == "v") {
1963     if cmpCaron.Has(ihB.Input)
1964       Send cmpCaron[ihB.Input]
1965   }
1966   else if (ihA.Input == ".") {
1967     if cmpDotAbove.Has(ihB.Input)
1968       Send cmpDotAbove[ihB.Input]
1969   }
1970   else if (ihA.Input == "o") {
1971     if cmpRingAbove.Has(ihB.Input)
1972       Send cmpRingAbove[ihB.Input]
1973   }
1974   else if (ihA.Input == "-") {
1975     if cmpMacronStroke.Has(ihB.Input)
1976       Send cmpMacronStroke[ihB.Input]
1977   }
1978   else if (ihA.Input == "_") {
1979     if cmpMacronStrokeAdd.Has(ihB.Input)
1980       Send cmpMacronStrokeAdd[ihB.Input]
1981   }
1982   else if (ihA.Input == "/") {
1983     if cmpStroke.Has(ihB.Input)
1984       Send cmpStroke[ihB.Input]
1985   }
1986   else if (ihA.Input == "b") {
1987     if cmpBreveSpecial.Has(ihB.Input)
1988       Send cmpBreveSpecial[ihB.Input]
1989   }
1990   else if (ihA.Input == "=") {
1991     if cmpDoubleAcute.Has(ihB.Input)
1992       Send cmpDoubleAcute[ihB.Input]
1993   }
1994   else if (ihA.Input == "h") {
1995     if cmpSmallH.Has(ihB.Input)
1996       Send cmpSmallH[ihB.Input]
1997   }
1998   else if (ihA.Input == "f") {
1999     if cmpSmallF.Has(ihB.Input)
2000       Send cmpSmallF[ihB.Input]
2001   }
2002   else if (ihA.Input == "t") {
2003     if cmpSmallT.Has(ihB.Input)
2004       Send cmpSmallT[ihB.Input]
2005   }
2006   else if (ihA.Input == "l") {
2007     if cmpSmallL.Has(ihB.Input)
2008       Send cmpSmallL[ihB.Input]
2009   }
2010   else if (ihA.Input == "r") {
2011     if cmpSmallR.Has(ihB.Input)
2012       Send cmpSmallR[ihB.Input]
2013   }
2014   else if (ihA.Input == "$") {
2015     if cmpCurrency.Has(ihB.Input)
2016       Send cmpCurrency[ihB.Input]
2017   }
2018   else if (ihA.Input == "g") {
2019     if cmpGreek.Has(ihB.Input)
2020       Send cmpGreek[ihB.Input]
2021   }
2022   else if (ihA.Input == "p") {
2023     if cmpSuperscript.Has(ihB.Input)
2024       Send cmpSuperscript[ihB.Input]
2025   }
2026   else if (ihA.Input == "u") {
2027     if cmpSubscript.Has(ihB.Input)
2028       Send cmpSubscript[ihB.Input]
2029   }
2030   else if (ihA.Input == " ") {
2031     if cmpSpace.Has(ihB.Input)
2032       Send cmpSpace[ihB.Input]
2033   }
2034   else if (ihA.Input == "q") {
2035     if cmpQuad.Has(ihB.Input)
2036       Send cmpQuad[ihB.Input]
2037   }
2038   else if (ihA.Input == "a") {
2039     if cmpArrow.Has(ihB.Input)
2040       Send cmpArrow[ihB.Input]
2041   }
2042   else if (ihA.Input == "s") {
2043     if cmpSymbols.Has(ihB.Input)
2044       Send cmpSymbols[ihB.Input]
2045   }
2046   else if (ihA.Input == "m") {
2047     if cmpMathSymbols.Has(ihB.Input)
2048       Send cmpMathSymbols[ihB.Input]
2049   }
2050   else if (ihA.Input == "A") {
2051     if cmpCapitalA.Has(ihB.Input)
2052       Send cmpCapitalA[ihB.Input]
2053   }
2054   else if (ihA.Input == "d") {
2055     if cmpSmallD.Has(ihB.Input)
2056       Send cmpSmallD[ihB.Input]
2057   }
2058   else if (ihA.Input == "D") {
2059     if cmpCapitalD.Has(ihB.Input)
2060       Send cmpCapitalD[ihB.Input]
2061   }
2062   else if (ihA.Input == "i") {
2063     if cmpSmallI.Has(ihB.Input)
2064       Send cmpSmallI[ihB.Input]
2065   }
2066   else if (ihA.Input == "I") {
2067     if cmpCapitalI.Has(ihB.Input)
2068       Send cmpCapitalI[ihB.Input]
2069   }
2070   else if (ihA.Input == "n") {
2071     if cmpSmallN.Has(ihB.Input)
2072       Send cmpSmallN[ihB.Input]
2073   }
2074   else if (ihA.Input == "N") {
2075     if cmpCapitalN.Has(ihB.Input)
2076       Send cmpCapitalN[ihB.Input]
2077   }
2078   else if (ihA.Input == "O") {
2079     if cmpCapitalO.Has(ihB.Input)
2080       Send cmpCapitalO[ihB.Input]
2081   }
2082   else if (ihA.Input == "S") {
2083     if cmpCapitalS.Has(ihB.Input)
2084       Send cmpCapitalS[ihB.Input]
2085   }
2086   else if (ihA.Input == "T") {
2087     if cmpCapitalT.Has(ihB.Input)
2088       Send cmpCapitalT[ihB.Input]
2089   }
2090   else if (ihA.Input == "P") {
2091     if cmpCapitalP.Has(ihB.Input)
2092       Send cmpCapitalP[ihB.Input]
2093   }
2094   else if (ihA.Input == "|") {
2095     if cmpVerticalLine.Has(ihB.Input)
2096       Send cmpVerticalLine[ihB.Input]
2097   }
2098   else if (ihA.Input == "*") {
2099     if cmpAsterisk.Has(ihB.Input)
2100       Send cmpAsterisk[ihB.Input]
2101   }
2102   else if (ihA.Input == "!") {
2103     if cmpExclam.Has(ihB.Input)
2104       Send cmpExclam[ihB.Input]
2105   }
2106   else if (ihA.Input == "?") {
2107     if cmpQuestion.Has(ihB.Input)
2108       Send cmpQuestion[ihB.Input]
2109   }
2110   else if (ihA.Input == "(") {
2111     if cmpParenLeft.Has(ihB.Input)
2112       Send cmpParenLeft[ihB.Input]
2113   }
2114   else if (ihA.Input == "+") {
2115     if cmpPlus.Has(ihB.Input)
2116       Send cmpPlus[ihB.Input]
2117   }
2118   else if (ihA.Input == "%") {
2119     if cmpPercent.Has(ihB.Input)
2120       Send cmpPercent[ihB.Input]
2121   }
2122   else if (ihA.Input == "8") {
2123     if cmpDigitEight.Has(ihB.Input)
2124       Send cmpDigitEight[ihB.Input]
2125   }
2126   else if (ihA.Input == "<") {
2127     if cmpLessThan.Has(ihB.Input)
2128       Send cmpLessThan[ihB.Input]
2129   }
2130   else if (ihA.Input == ">") {
2131     if cmpGreaterThan.Has(ihB.Input)
2132       Send cmpGreaterThan[ihB.Input]
2133   }
2134   else if (ihA.Input == ";") {
2135     if cmpSemicolon.Has(ihB.Input)
2136       Send cmpSemicolon[ihB.Input]
2137   }
2138   else if (ihA.Input == "1") {
2139     if cmpDigitOne.Has(ihB.Input)
2140       Send cmpDigitOne[ihB.Input]
2141   }
2142   else if (ihA.Input == "2") {
2143     if cmpDigitTwo.Has(ihB.Input)
2144       Send cmpDigitTwo[ihB.Input]
2145   }
2146   else if (ihA.Input == "3") {
2147     if cmpDigitThree.Has(ihB.Input)
2148       Send cmpDigitThree[ihB.Input]
2149   }
2150   else if (ihA.Input == "4") {
2151     if cmpDigitFour.Has(ihB.Input)
2152       Send cmpDigitFour[ihB.Input]
2153   }
2154   else if (ihA.Input == "5") {
2155     if cmpDigitFive.Has(ihB.Input)
2156       Send cmpDigitFive[ihB.Input]
2157   }
2158   else if (ihA.Input == "7") {
2159     if cmpDigitSeven.Has(ihB.Input)
2160       Send cmpDigitSeven[ihB.Input]
2161   }
2162   else if (ihA.Input == "0") {
2163     if cmpDigitZero.Has(ihB.Input)
2164       Send cmpDigitZero[ihB.Input]
2165   }
2166   else if (ihA.Input == "[") {
2167     if cmpBracketLeft.Has(ihB.Input)
2168       Send cmpBracketLeft[ihB.Input]
2169   }
2170   else if (ihA.Input == "]") {
2171     if cmpBracketRight.Has(ihB.Input)
2172       Send cmpBracketRight[ihB.Input]
2173   }
2174   else if (ihA.Input == "\") {
2175     if cmpBackslash.Has(ihB.Input)
2176       Send cmpBackslash[ihB.Input]
2177   }
2178   else if (ihA.Input == "G") {
2179     if cmpCapitalG.Has(ihB.Input)
2180       Send cmpCapitalG[ihB.Input]
2181   }
2182   else if (ihA.Input == "B") {
2183     if cmpCapitalB.Has(ihB.Input)
2184       Send cmpCapitalB[ihB.Input]
2185   }
2186   else if (ihA.Input == "L") {
2187     if cmpCapitalL.Has(ihB.Input)
2188       Send cmpCapitalL[ihB.Input]
2189   }
2190   else if (ihA.Input == "R") {
2191     if cmpCapitalR.Has(ihB.Input)
2192       Send cmpCapitalR[ihB.Input]
2193   }
2194   else if (ihA.Input == "6") {
2195     if cmpDigitSix.Has(ihB.Input)
2196       Send cmpDigitSix[ihB.Input]
2197   }
2198   else if (ihA.Input == "C") {
2199     if cmpCapitalC.Has(ihB.Input)
2200       Send cmpCapitalC[ihB.Input]
2201   }
2202 }